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£67.85 + VAT AND GET A FREE VIC LIGHT PEN (WORTH £17.35) 
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VIC STARTER KIT 


VIC 20 
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To many people the Pet is a computer capable performing just one 
task. In our own office, someone who'd never seen the Pet being 
used for anything other than wordprocessing was convinced that 
that was all it could do, and it took a lot of persuasion to make her 
realise that the wordprocessing program was just that and that 
alone: a program to enable the Pet to emulate a wordprocessor. 

After a demonstration of a data base program and various other 
packages it was fairly clear that the Pet is a computer capable of 
many, varied jobs. A look through Commodore’s own Approved 
Products catalogue would show just how many different uses a Pet 
can be out to: from accountancy to typesetting, from statistical 
analysis to space invaders, and frontiers beyond. 

We hope that this diversity of interests is reflected in the contents 
of the magazine. By the very nature of the magazine we have to 
cover a lot of varied topics: what applies to the V10 will not (usual- 
ly) apply to the SuperPet, for instance. 

Certainly that diversity is shown by a look at a cross-section of 
you, the readers. From private individuals to the largest company 
conglomerate, there must be an awful lot of Pets out there doing 
some very strange things! 

This, in a computer industry that is constantly changing must be a 
good thing. The occasional manufacturer who places all his eggs in 
one basket (e.g. Clive Sinclair, one ZX machine at a time), will suc- 
ceed, but these are few and far between. 

By taking advantage of the wide range of interests shown by the 
market place, and producing a computer to fill every available gap, a 
company will naturally be in a stronger position to survive. Com- 
modore are attempting to do this with a variety of machines, from 
the Vic 10 (or whatever it will become known as) to the 720 series. 

As Commodore continues to grow, so must we, the magazine. 


Whatever system you own or use, we look forward to having you 
with us! 
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Dear Sirs, 


In the July edition of Com- 
modore Computing you publish- 
ed a routine for disc appending 
files, written for Basic 2 
machines, and asked for a Basic 
4 version. This routine obvious- 
ly fulfills a great need, and as 
my system is Basic 4 | under- 
took a conversion of Mr. 
McLean's program. Much to my 
relief, and surprise, it proved a 
simple operation, and the 
machine code and a basic 
loader (for those wary of the 
monitor!) are attached. 

The code is fully relocatable 
to any suitable memory area. In 
the version below | have placed 
it in the first cassette buffer, 
which is convenient for my 
system. 

| have a question that you, or 
your readers, may be able to 
answer. It seems that the 12’’ 
screen CBMs have a CRT con- 
troller chip which potentially 
has facilities for the connection 
of a light pen, although this is 
not implemented in the CBM. 
Does anyone know whether this 
facility can be used, by hard- 
ware modification of a relatively 
simple sort, and if so, how? 


Yours sincerely 
Dr. Heathcote 
Cardiff 


Dear Dr. Heathcote, 


Thank you for the listings, 
which we reporudce below. 

The chip in question is the 
Motorola 6845, which does in- 
deed have the facility to con- 
nect a light pen, but this is not 
implemented on the Pet, and as 
far as we know no-one has 
even attempted to do so. This 
chip is in fact implemented on 
the Pet, and as far as we know 
no-one has even attempted to 
do so. This chip is in fact pretty 
impressive, and it’s a shame 
that Commodore didn’t make 
full use of the facilities on 
board. 

To go into further detail about 
the 6845 would probably fill the 
magazine, and for many months 
to come at that, but additional 
information can be gleaned 
from a splendid book called 
Microcomputer Components, 
published by Motorola 
themselves. You should be able 
to get a copy from any 
distributor of theirs, and inside 
you will find some 20 or so 
pages all about the 6845. An 
amazing bit of hardware! 
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Dear Sirs, 


Please find a cheque for one 
years subscription to Com- 
modore Computing. 

| am an avid Vic fan, and a 
proud owner of such a 
machine. Could you tell me if 
the Vic 20 can be simply (and 
hopefully relatively cheaply) 
upgraded to such machines as 
the Commodore 64 when it ap- 
pears, and will your magazine 
be covering Commodore’s new 
machines as | have heard many 
rumours (nice ones at that) 
about the above named micro. 


Yours sincerely 
G. Hughes 
Blackpool 


Dear Mr. Hughes, 


Thanks for the letter, and 
subscription cheque. We hope 
you enjoy the magazine! 

We certainly shall be covering 
any new machines that Com- 
modore produce. We are called 
COMMODORE Computing after 
all! Seriously, our aim is to ex- 
pand the magazine as the range 
of machines available expands, 
so as to give the best coverage 
we possible can to each and 
every one of them. 

The question of upgrading ex- 
isting VIC 20s is an interesting 
one. Commodore’s John Baxter 
has said that an upgrade will be 
available, and if he gets his way 
it will cost around 100.00 


pounds (remarkable really: the 


VIC is just under 200 and the 
64 is just under 300!). 
However, the Vic has outlet for 
one joystick, the 64 has two. 
There are other differences as 
well, about the only common 
thing being the keyboard. 

So whether this upgrade 
means ripping out everything 
from the Vic 20 and being a 
total replacement (keeping the 
keyboard of course!), or what, 
we don’t yet know. We'll keep 
you posted. 


Dear Sirs, 


| have a CBM 3032 which was 
acquired to help a schoolboy 
with computer studies. Now he 
is trying to get hold of software 
and program books to play 
games on the machine, as well 
as learn to program and operate 
it himself (dad’s interested as 
welll) 

Any advice, sources, books 
you can recommend would be 
appreciated. | often wonder 
whether tried and tested games 


programs have every been col- 
lected into one book and 
published for the 3032. Have 
they? 


Yours sincerely 
T.J. Davies 
Redruth 


Dear Mr. Davies 


Thank you for your letter. 

Many people decry games as 
being of no use to man nor 
beast, but as an initial introduc- 
tion to computing | think that 
they serve a most useful pur- 
pose. It is no coincidence that 
Commodore's (and other peo- 
ple’s) best selling educational 
tapes, for instance, have had 
some kind of game-playing role 
attached to them. 

Consequently, although there 
are many tapes available, from 
people like Audiogenic (tel. 
0734 586334) or Supersoft 
(tel. 01-861 1166), it comes as 
some surprise to find that there 
are remarkably few books of 
games listings around. Certainly 
for the 3000 series machines 
anyway. 

Still, there is one, called Pet 
Fun and Games, published by 
McGraw/Hill. It is aimed at the 
Commodore range generally, 
rather than just the 3000, but 
the programs will nonetheless 
work on all machines. Well put 
together and well presented, a 
telephone call to 0628-23431 
will give you all the information 
you need. 


10 PRINT" BASIC 4 DISC APPEND" 
PRINT"THIS ROUTINE WILL ALLOW A SUBROUTINE" 


20 


027A 
027C 
027E 
0281 
0283 
0285 
0287 
0289 
028¢C 
028F 
0292 
0295 
0297 
029A 
029D 
02A0 
O2Al 
02A3 
02A5 
02A7 
02A9 
O2AB 
02AD 
02B0 


F4 


F3 
F4 


LDA 
STA 
JSR 
LDA 
STA 
LDY 
BNE 
JMP 
JSR 
JSR 
JSR 
LDA 
JSR 
JSR 
JSR 
SEC 
LDA 
SBC 
STA 
LDA 
SBC 
STA 
JSR 
JMP 


£500 
$9D 
$F47D 
£$60 
$D3 
$D1 
$028¢C 
$BFOO 
$F449 
SF4A5 
$FOD2 
$D3 
$F143 
$F1C0 
$F1c0 


$2A 
£$02 
SFB 
$2B 
£$00 
SFC 
$F38C 
$F41C 


30 PRINT'SAVED AS A PROGRAM FILE ON DISC TO BE" 


40 


PRINT"APPENDED TO A PROGRAM IN THE MEMORY" 


50 PRINT'N.B. THE SUBROUTINE MUST BEGIN WITH" 


60 


70 PRINT" IN THE MAIN PROGRAM 
80 PRINT"ACTIVATE WITH :- 


90 READI 


PRINT"A LINE NUMBER GREATER THAN THE LAST" 


100 PRINT" SYS"I ;CHR$(34)"FILE NAME"CHRS(34)",8" 


110 FORJ=0TO56:READ A:POKEI+J,A:NEXT 


120 REM THE ROUTINE IS FULLY RELOCATABLE 
130 REM THE START ADRESS IS IN LINE 1000 


1000 
1010 
1020 
1030 
1040 
1050 
1060 
1070 
1080 
1090 
READY. 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
.DATA 
DATA 
DATA 


634 


244 


169,0,133,157,32,125,244 
169, 96,133,211, 164,209, 208 
3,76,0,191,32,73,244 
32,165,244,32,210,240,165 
211,32,67,241,32,192,241 
32,192,241,56,165,42,233 
2,133,251,165,43,233,0 
133, 252,32,140,243, 76,28 


New Product News 





LATEST Commodore News 


Despite the oncoming launch of the new 
machines from Commodore, peripherals and add- 
ons for the existing Vic 20 continue to appear 
with great regularity. 

D.A.M.S. up in Liverpool (051 548 7111) have 
brought another light pen onto the scene. Admit- 
tedly at 19.99 pounds it is cheaper than the rest 
(probably because it uses less cable than any of 
the others, albeit sufficient), but apart from that 
what else can you say about a light pen? It works, 
there is a demonstration program supplied (which 
works in interesting ways its wonders to per- 
form), and that is about it. 

Still, it is on the market, at a fairly cheap price, 
so prospective buyers of light pens could do 
worse than examine this one. 

One would never know that Audiogenic (0734 
586334) had a new person handling their public 
relations. Bombarded with press releases, they do 
bring to light a number of interesting products. 

They've just taken on board the Supersoft pro- 
duct Mikro Assembler, suitably modified for the 
Vic. Some of the facilities provided include an in- 
ternal monitor and an assembler, to make 
machine code programming on the Vic 
significantly easier. As well as this, there is a high 
resolution plotting facility (based on a 176 by 
160 matrix), and additional control over the Vics 
existing sound capabilities. Available on a car- 
tridge, with an extra 3K RAM, for just 49.50 
pounds. 

Next off the line comes something called BUTI, 
which they insist you pronounce as Beauty: this is 
what we in the trade call a chip Buti. In their now 
traditional format of coming in the form of a plus 
in cartridge with an extra 3K RAM, Buti retails at 
39.99 pounds. Essentially a variant on the old 
Toolkit idea, this adds an additional 17 com- 
mands to the Vic’s existing Basic. 

Moving smartly on, we come to Boss, describ- 
ed as the definative chess game for the Vic (but 
then aren’t they all? When will Boss play Com- 
modore’s own version of Sargon?). Features im- 
plemented include castling, ‘en passant’ and 
queening (but we chess players know that you 
don’t always want a queen!), at 14.99 pounds it 
does seem to be a fair buy. In a competition bet- 
ween itself, Sargon on the Apple, PetChess on 
the 8032 and Chessmaster on the TI 99/4A it 
came out well on top. We'll try and feature a full 
review of this in the coming months. 

Before we turn this into the Audiogenic fan 


club, we'll finish by mentioning Wordcraft 20 for 
the Vic, again as a cartridge, but with a whole 8K 
extra this time. 

The press release starts off somewhat grandly 
by proclaiming that ‘the typewriter has now 
become completely obsolete’. Well. There is no 
doubt that Wordcraft 20 is a well-written and 
well-documented package, with most of the 
features of its big brother Wordcraft 80. 
However, the merits of owning a wordprocessing 
system that allows you only to see 24 characters 
in a line at any one time (I know it scrolls up, 
down, left and right) | will leave up to you. 

If you want to do wordprocessing on a Vic 
Though, for 125 pounds this is certainly worth 
examining. 


VATman and Robbins 

One of the major problems facing any retailers 
using the familiar Simplex cash book is ... using 
the Simplex Cash Book! Although the system has 
been running now for something in the region of 


QUALITY 
OF 
SERVICE 
PLEASES EVERYONE 


If your users and operators deserve the best 
support available for Commodore Based 
Systems then contact Brian Homewood of 
PEACH DATA SERVICES LTD. on 
0283-44968. 


PEACH DATA SERVICES LTD. can supply 
and maintain all Commodore Systems. The 
software sold undergoes very careful appraisal 
and only the best is made available to 
customers. 


By supplying fast, prompt service at all 
times, in all kinds of system emergency we 
keep your user departments working smoothly. 
Replacement systems, extra operators, 
customised training, frank system appraisals 
can all be obtained. Your staff will be pleased 
with the extra support; productivity of the 
department will improve. 


PEACH DATA SERVICES LTD. 


5 Horninglow Street, Burton-on-Trent, Staffs. 
Burton (0283) 44968 
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fifty years, it is still a time consuming process to 
actually fill the book out, and many errors will 
tend to creep in. 

There is also the perennial problem of the VAT 
returns, a harrowing financial nightmare for any 
accountant, however well trained. 

Now however, there is a package called Micro- 
Simplex, which as you might surmise is based on 
the Simplex book. Thus, anyone who’s used to 
using the book should take to the microcomputer 
equivalent very quickly. Designed by Catlands In- 
formation Systems in Macclesfield, the package 
is now being handled by Micro-Simplex, 
themselves an offshoot of Catlands. Mike 
Dawson is the man in the know about this, and he 
can be reached on 0625 61500. 

Essentially then this is of interest to the retail 
market, and we'll be bringing you a full review of 
this shortly, hopefully in next months issue. 


Faulty Towers? 

For a long time now there has been just one ma- 
jor suite of programs on the Pet for hoteliers, 
namely the series of programs from Landsoft. 

Recently we received news of another system, 
this one being from Devon Computers (0803 
526303). Everything in the promotional sales 
literature points to it being along roughly the same 
lines (just what is a hotel package supposed to do 
after all? Manage a hotel), so comparison bet- 
ween the two at your local dealers would pro- 
bably be worthwhile if you're interested in this 
kind of thing. 

However, when. sales literature includes 
phrases like ‘finest system available in the Com- 
modore range for Hotels’, ‘review this fine pro- 
duct’, ‘put you in touch with some of our satisfied 
users’, | for one tend to fall asle ..... | 


More New Chips 

Kevin Viney of ICPUG has developed a trio of 
chips for the Commodore range of machines, and 
the latest of these (known appropriately as 
TRIOS) is now being actively marketed by a com- 
pany called Consup (tel. 01-670 4411). 

As is now standard with these chips, they 
replace one of the existing Pet ones, thus not los- 
ing any valuable space in the computer. This par- 
ticular one goes into the ‘E’ ROM slot, and as well 
as retaining the Pet Basic adds a number of uni- 
que ones of its own. 

For instance, the ability to scroll backwards 
through a listing, and to page through in either 
direction (a most useful routine), is presented 
here. Unfortunately that is basically it! One or two 
other things, such as _ shifted return deletes 
everything on that line after the cursor position 
(but does not erase it from memory until return 
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itself is pressed), OLD is a useful command if 
you've happened to type NEW by mistake, and 
DO ignores a line number and a REM, and ex- 
ecutes any Basic statement following. 

So, for 27.00 pounds, backward scrolling of a 
listing could be yours! 


Training Courses 

Yet more training courses have been announc- 
ed recently for the Commodore range of micros, 
this time by a company called MicroTraining, bas- 
ed in the West Midlands — tel. 021-550 1827 
for further details. These training sessions are 
usually carried out in two five hour blocks on site, 
or you can opt for attendance at the MicroTrain- 
ing computer school in Ward End, Halesowen, for 
five, weekly, two hour sessions. 

The aim of these courses is to introduce the 
businessman to the use of computers, and ac- 
quaint him with just some of the workload that 
microcomputers can take in the office 
environment. 

Interestingly enough, MicroTraining claim that 
‘Commodore were so impressed by the courses 
that they appointed MicroTraining to be the only 
external authorised Commodore training centre’. | 
wonder what McDowell Knaggs and Associates 
in Worcestershire would have to say about that?! 


Computer Aided Design 

Jentech Services Ltd. (tel. 07462 5287), have 
recently brought out a complete system for 
microcomputer aid draughting, and for around 
5,800 pounds you get a 32K Pet, a minimum of 
1/2 megabyte of storage on disk, a great deal of 
sophisticated software, and an intelligent X-Y 
plotter. 

As an inexpensive approach to C.A.D. this 
system offers more than most, and at a very 
reasonable price. Upward expansion from the 
basic set-up is available should it be required. You 
can build up a library of drawings, shapes and 
standard parts or symbols, to be called up as re- 
quired, stores on disk, scaled up and down: in 
other words, to be done with as you wish! A com- 
prehensive package. 


Words on Word Processing 
Last month we mentioned Superscript from the 
Independent Commodore Products Users Group, 
but also said that there was some confusion over 
the future of the program, what with the odd 
court case pending. Superscript has now been 
taken over by a company named Precision Soft- 
ware (01-330 7166), and is being actively 
marketed by them. 

It's interesting to note that Commodore 
thought enough of Superscrpt (including praise 


from Jack Tramiel himself!), that they asked the 
author, Simon Tranmer, to produce a version for 
the Commodore 64, so expect that out before 
long. 

One bone to pick with Precision Software 
though: when ICPUG had the program it cost 35 
pounds to buy, but Precision were talking about a 
price in the region of 240 pounds, which defeats 
the object somewhat. 

Hopefully that price will come down: ICPUG 
started a nice precedent by releasing a really 
powerful, low cost word processing package, and 
not it’s been taken out of their hands. 

Whilst we’re talking about word processors, 
another package has appeared from Landsoft 
(01-878 7044/7), in the form of a new version of 
Wordform (Il this time). 

Based on their earlier Wordform, it is very much 
a ‘What you see is what you get’ word processor, 
using as it does the screen as a typewriter: no bad 
idea, when introducing secretaries unfamiliar with 
computers to the are to using one. In other words, 
as you type a screen ‘window’ moves its way 
along in front of you, performing a carriage return 
whenever you get to the end of a line, taking any 
word with it as necessary. 

An easy to understand package, and at 150.00 
pounds probably the cheapest major program 
now on the market, with Precision Software hav- 
ing altered the price of Superscript. Well worth a 
look at. 


Diplomacy 

When you think of a really nice name for a new 
Pet product, perfect it, do all the literature, and 
get prepared for the big launch, it must be a major 
disappointment when you realise that the name is 
not, after all, quite right. 

Such is the case with the Versatile Interface 
Card, now being distributed in the U.K. by Cor- 
rtronic, in Manchester (tel. 061-865 5070). A 
nifty little name you might think but what are the 
initials? V.I.C., the name of a certain well-known 
other computer from Commodore, unfortunately. 
So, the VIC-2 has now become known at the 
Diplomat. 

This is a card which fits inside the existing Pet 
case (although optionally outside), and provides 
many additional external interface capabilities. On 
board we have 80 |/O lines (the equivalent of 8 
Pet User Ports!), 2/16 bit timer counters, and 2 
serial |/O ports. 

In addition to all this we also set a 1K battery 
backup RAM, a built in calendar/clock, a power 
down detector, and one or two other things as 
well. 

At a cost of 380 pounds this is worth a look if 
you’re into interfacing to the outside world. 


Program Storage 

As an alternative to the usual disks or casset- 
tes, a new form of program storage has arrived 
from Microscience in Stockport (tel. 061-477 
3888). As is the case with Diplomat, this takes 
the form of a board that fits inside the Pet, and 
has the ability to store from 2K to 28K, using a 
range of 2716 or 2732 Eproms as necessary, 
depending on the size of the program to be 
stored. 

As an additional security there is the facility to 
have your programs (which can be written in 
Basic, machine code, compiled, or a combination 
of all three!), once stored on Eprom, run 
automatically on computer switch on. Alter- 
natively, programs can be called up with our old 
friend the SYS command. 


New Printers 

Ever since Commodore disbanded the old 8026 
and 8027 daisy wheel printers, the market has 
been waiting for a replacement to come along. 

None such has appeared from Commodore, but 
two new printers have come out recently, and the 
first of these bears a remarkable resemblance to 
the 8026: hardly surprising really since it’s vir- 
tually the same machine! However, there are one 
or two nice additions which our old friends never 
had. 

We now have 10, 12 or 15 characters per inch, 
and the ability to accept paper up to 17 inches 
wide, with a 14 inch print width. Bi-directional 
printing (at last!) gives us a much faster print 
speed, and the rather nice 4K buffer allows the 
unit to happily print away in its own time, while 
you get on with the host computer. 

It comes with either IEEE, RS232 or Centronics 
interfaces, so it should link to just about anything, 
and if you’re after further information on this 
1098 pound printer ring Dataplus Ltd., on 0242 
30030/37373, and say ‘what can you tell me 
about the Scripta Il?’ 

How many daisy wheel printers have you seen 
recently, priced at 485 pounds? Well, Butel- 
Comco have brought one such into the world, 
having had a few words in the ears of Smith- 
Corona Typewriters. Linking up to the old Pet 
quite easily, it is a true daisy wheel, with two ver- 
sions currently available: 10 characters per inch 
or 12 characters per inch. You must specify the 
one you want at time of purchase. 

An admittedly low print speed of just 120 
words per minute (or about 10 characters per se- 
cond) is not one of its strongest features, but at 
485 pounds one can’t really complain. We'll bring 
you more on this one next month, but meanwhile 
ring 01-202 2277 and ask for Cliff Osborne. 
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Two User Groups 


There are many independent user groups up 
and down the country. Their enthusiastic 
members meet regularly once a month (well, fairly 
regularly), to discuss and demonstrate the Com- 
modore range of machines. These meetings are a 
great opportunity for Commodore users in a par- 
ticular area to get together and pool their 
information. 

Nobody knows everything about computing, so 
these get-togethers give experienced users, and 
perhaps more importantly the not-so-experienced 
users, the chance to swop ideas, listen to guest 
speakers, and watch demonstrations of both 
hardware and software. All the latest news from 
Commodore, and the industry in general, are 
poured over at these gatherings, which, apart 
from the computer aspect, make a very pleasant 
social event. 

This month we take a look at two of the in- 
dependent user groups in the south of England, 
namely the Canterbury group and the Watford 
group. 


Canterbury Group 

The Canterbury group meets on the first Tues- 
day of each month, at the Physics department of 
the University of Kent. It began its life back in the 
summer of 1980, and was officially affiliated to 
1.C.U.G. in July1981. With a starting list of just 
five members, this has now risen to forty and, as 
they say, is rising every month. 

A typical club night involves a broadcast of the 
latest news in the industry, and also includes 
news of the South East group (featured a while 
ago on these pages), with which there are close 
ties. 

After a break for refreshments, they usually 
feature a guest speaker giving a talk or 
demonstration of some new item of hardware or 
software : a recent example was a showing of 
The Administrator, by Stage One Computers. 
Other guests have included the knowledgeable 
Harry Broomhall, and the General Secretary of 
1.C.P.U.G. Jim Tierney. 

The evening is finished off with a question and 
answer session on whatever topics are brought 
out into the open. Usually they'll round off at 
about eleven o’ clock, having spent some three 
and a half hours covering all the bases. 

Members are kept well informed of forthcoming 
meetings and events by a monthly circular. As 
with all these user groups, their members come 
from many walks of life: Canterbury in particular 
features children, school teachers, businessmen, 
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and many more. In short, everyone is welcome. 

If you live in the area, own or use a Pet or Vic 
machine, and would like further details, your per- 
son to contact is John Bickerstaff, at 48 Martin 
Down Road, Whitstable, Kent. He can also be 
reached by telephone on 0227 272702 at home, 
or during the day on 01-499 9102. 


On to Watford 

Another well organised club is the Watford group, 
run by Stephen Rabagliati and Rod Eva. After a re- 
cent telephone conversation with Stephen we 
were given a rundown on the history of the club, 
and how it has progressed to its current form. 

The club is now a year old, and was started just 
after the Pet Show of 1981. Stephen and Rod 
decided that they would like to form a group of 
their own, and so with help and ideas from Mick 
(of the South East regional group), the club began 
its life. 

The existence of this new club was soon on the 
streets via the newsletter Oz (no, not that one!). 
Other promotions included a mailshot to all 
known owners and users in the area, asking them 
to come down to the meetings. 

The first meeting had an encouraging start, 
with forty people turning up. This continued for 
the next three months, but each month the forty 
people were different... a worrying time for 
Stephen and Rod. Everything finally settled 
down, and now the club has seventy paid up 
members (membership being just three pounds 
per year). 

The club has five Pet machines, allowing 
members lots of hands-on time, obviously a great 
benefit. The majority of members are 
businessmen, so naturally the emphasis is on 
business hardware and software. Recent work 
has involved the use of Prestel on the Pet, and 
other projects have included help in preparation of 
the |.C.P.U.G. software library. Obviously an ac- 
tive and enthusiastic bunch, they also involve 
themselves in exhibition work, both locally and 
nationally. 

Meetings are usually on the second Monday of 
every month, and in addition a monthly 
newssheet is sent out informing members of 
changes, general information and personal re- 
quests for help. 

Future plans include a separate group for the 
Vic machine, so if you live in the area, own a Pet 
or a Vic machine, and want to get involved, 
please contact Stephen, care of Grocery Distribu- 
tion, Grange Lane, Letchmoe Heath, Watford. 

If you would like your club featured in a future 
issue of Commodore Computing International, 
please get in touch with the editor of the 
magazine at the address on the masthead. 


Education 





Computer Programming History 


| recently read an account of the sinking of the 
Bismarck and then began to realise how this age 
of computers can subscribe towards today’s 
presentation of history and also to posterity. 

The Bismarck epic is typical of countless others 
on land, sea, and in the air inasmuch that a great 
deal of documented orders, times, positions etc. 
is available. It is from such detail that computers 
can be programmed to virtually re-create 
historical events such as this, and here therefore 
exists a means to present and preserve history 
with proved accuracy because for example, if 
orders for speeds and headings have been cor- 
rectly recorded, a computer will produce tracks, 
courses and engagement areas to scale. They 
therefore are also capable of producing a ‘living’ 
diagram of land, sea, and air battles and this is 
particularly significant with respect to visual 
displays of history which may provide both in- 
teresting television material and accurate 
reference for future historian.s. 

Take the Bismarck action as an example. A 
computer programme based upon documented 
times available enables this epic to be presented 
literally to any time scale. This means that the five 
days elapsing from the time fo the Bismarck’s 
sailing from Bergen until its sinking at 10.40am 
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on May 27th 1941 can be scaled down to a (say) 
one-hour programme. Thus, a coloured ‘live’ 
diagram graphically displaying distribution of 
forces involved and their courses of action serves 
as a fundamental reference throughout a televi- 
sion programme of the sinking of the Bismarck. 

It is at this point an ability to scale time adds 
further facilities for clarifying this major event in 
World War Two. For example, while a one-hour 
programme must display progress or events at a 
rate 120 times faster than the actual time ensu- 
ing between the 22nd and 27th May, this is a 
practical rate for displaying an overall reference 
diagram of television screen size. On a 20-inch 
screen for example, the distance covered by the 
Bismarck from Bergen to its final resting place in 
the Atlantic is approximately 21 inches i.e., its 
position on a television screen changes at an ap- 
proximate rate equivalent to the tip of the minute 
hand of clock, seven inches in diameter. While it 
is to be appreciated that five or six other deplying 
forces are to be simultaneously displayed and in- 
dicated during a commentary. At certain stages 
also, the programme will be re-scaled in time to 
enable detailed accounts of major incidents to be 
illustrated. 

The fundamental programme in addition to pro- 
viding a realistic continuity, also serves to trigger 
existing historical pictures and films into the 
television programme at appropriate times in- 
cluding their actual times of happening relative to 
the basic time scale. Furthermore, and in order to 
augment this type of presentation, computer 
techniques today enable events to be graphically 
re-constructed. For example, a computer pro- 
gramme may be re-scaled in time and in graphics 
to produce separate diagrams where warship 
outlines, ranges, and shell trajectories are il- 
lustrated along with vulnerable target areas, hits, 
torpedo strikes and their subsequent effects. At 
this stage however, a programme should not be 
just a technical exercise but a vehicle for respec- 
ting and remembering thousands of dedicated 
and brave souls who were lost at this time. 

It is not impractical to forecast that the day will 
come when much of history will be re-created us- 
ing Computer techniques including three dimen- 
sional displays of battle areas on land sea and in 
the air. Here is a beginning using two dimensions 
and if to some, a re-creation of the past is wasted 
time and energy, perhaps it is as well to 
remember it is the past which determines our 
future and this should therefore be clearly and ac- 
curately recorded. 
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Microcomputers in Business: 


Taking the Next Step 


Last month we presented a few introductory 
tips on what to look for, and indeed what to look 
out for, when going about purchasing for the first 
time a microcomputer system for use in the 
business market. 

This month we'll go one step further, by assum- 
ing you have your system installed and running in 
your office, and that it’s quite happily solving the 
major problem you bought it for. However, in the 
back of your mind is the nagging feeling that this 
is, after all, a microcomputer, and shouldn't it be 
doing something else as well? 

But all you know is how to press SHIFT/RUN- 
STOP to set the program running. How do you go 
about taking the next step? That’s the problem 
we'll try and solve. 


Training Courses 

We have reported in past issues of Commodore 
Computing on the large number of companies 
that are now running training courses based on 
Commodore equipment. You only have to look at 
virtually any New Product News section to see 
just how many there are. 

This is probably one of the best first steps you 
could take. These courses can last for any length 
of time from one day upwards, although two or 
three is the more usual schedule. Cost will ob- 
viously vary from place to place, so it’s worth 
having a look around to get the best value for 
money. 

The sort of material covered will again depend 
on the course, but as an initial foray your best bet 
would be to try one that was a more general in- 
troduction, rather than an attempt to teach you 
Basic programming in three hours (they exist!). 

To begin with, you won’t really want to get into 
programming. First of all, you'll need to know 
whether it would be worth your while to do this, 
so get an ideal of what your micro is capable of 
doing from the people who know, in preference to 
deciding yourself what you think it’s capable of 
doing. 


Next Steps 

Having obtained at least some idea of what the 
Pet can achieve for you, one then arrives at the 
question: how do | go about implementing it? 

There are three major options available to you, 
and the final decision must depend on cost, time 
and your own personal aptitude. 

The first option would be to do it yourself. Cer- 
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tainly cost would be a minimal factor here, since 
you’re hardly going to bill yourself for programm- 
ing work done on behalf of your own company 
(are you?!). A look at this month’s Applications 
Story will give you an idea of how someone else 
has tackled this quite difficult task, particularly if 
you've never programmed before. 

If this is the course you decide to follow, then 
you're going to have to learn about programming 
for yourself. As stated earlier, there are a number 
of courses open to you, any number of which can 
take you into the mysterious depths of program- 
ming, both in Basic and machine code. Whether 
you want to go on any of these will be entirely up 
to you. Out of the three choices | personally 
would go for this one. Firstly, you will be able to 
implement not only immediate changes, but any 
future ones, yourself. Secondly, if at any stage 
you decide to install more equipment, you will 
stand less chance of being bamboozled by the 
slick salesman. Finally, it will not cost you the 
sometimes quite large sums of money that our se- 
cond option will cost, and this is ... 
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The only U.K. magazine dedicated to 
Commodore Users and Commodore 
Equipment. 


Editorially aimed at the experienced 
(and not-so-experienced!) user of 
Commodore Computers. 


Always first with the latest 
Commodore news and views. 


Packed with programming hints and 
listings. 

With a controlled circulation to known 
Commodore users and dealers it is the 
foremost advertising avenue to an 
estimated 100,000 Commodore 
audience. 





MICROSCRIPT 


Word processing 
made simple! 


YOU DON’T HAVE TO BE A WIZARD TO USE MICROSCRIPT 


powerful, 


are reading. 
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Whether you’re a secretary, businessman, author, 
or journalist — MicroScript can help you. From a 
single page letter to volume mailings, from one 
page reviews to complete books — MicroScript 
is simple to use yet rich in facilities. 


MicroScript has the largest text memory capacity 
of any word processor for the Commodore 8000 
series computers — even though it’s probably the 
longest program ever written for the 8032 and 
8096. Sounds incredible doesn’t it? 


Here’s how we do it: MicroScript is the first in a 
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new generation of business software, supplied not 
on a floppy disk but burned into banks of micro- 
chips. What this means is that instead of using the 
memory that’s already there, MicroScript adds 46k 
of ROM and 2k of RAM to your computer. It even 
doubles the ROM expansion capability. 


What does all this mean for you, the user? It means 
that you’re investing in the latest technology. It 
means that you’re buying the Rolls-Royce of word 
processors. Most of all it means that you're 
investing a little money to save a lot of time. 
Simple, isn’t it! 


MICROSCRIPT IS AVAILABLE FROM YOUR COMMODORE DEALER 
© Viza Software 1982 


Distributed by SUPERSOFT, Winchester House, Canning Road, Harrow, England 
Telephone: 01-861 1166 (3 lines) 
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Microcomputers in Business: 


Outdside Help 

There are many programmers, software houses, 
dealers etc. who would be only too willing to 
customise existing and future programs to your 
specific requirements, so that you could have no 
quarrels over the functions those programs would 
perform. You stated what you wanted the pro- 
gram to do, and they made it do the job for you. 

Sounds ideal, doesn’t it? There are, needless to 
say, pitfalls. 

Principal amongst these is the price. Custom 
programs do not come cheaply, and even by do- 
ing a lot of shopping around you are not going to 
reduce the price by much. Essentially, everyone 
knows what everyone else is charging, so its up 
to how competent you think the programmer is 
rather than by how much you think he’s trying to 
line his wallet which should be your ultimate 
guideline. 

You will pay a lot of money, but on the other 
hand you will get a program that does its job 
satisfactorily. No more, no less : you will only get 
what you ask for. 

In many ways this is not an ideal solution: it’s 
expensive, is the main downfall, and you could 
really do it yourself if necessary. Still, not 
everyone has the time to do it themselves, so the 
decision is yours. 


Off the Shelf? 

And so onto our third option, namely buying a 
package that is available off the shelf. 

Software packages exist to cover just about 
any commonly encountered computing require- 
ment, and even most of those which are extreme- 
ly uncommon! Certainly, the majors of word pro- 
cessing, stock control, accountancy etc. are all 
admirably covered by a host of companies. The 
difficulty begins when you try and settle the one 
that’s right for you. 

Presumably, you'll have started with such a 
package anyway, so an important area to look at 
will be the interfacing from one package to 
another. For instance, just about anyone who pro- 
duces a generalised data base package has realis- 
ed the importance of interfacing that package to a 
word processor. 

Most of the accountancy packages around 
have a similar link. The well known Visicalc pro- 
gram will interrelate to just about everything cur- 
rently on the market. This could save you an 
awful lot of time when working on generalised 
information. 

As a final example, Microfacts82, reviewed 
last month, is a totally integrated accountancy 
package that has links to a stock control, and 
many other options as well. 

So, always be conscious of this facility: future 
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‘Our Computer Is on the 
Blink. Can You Send Over a 


Hundred of Your Fastest 


Mathematicians?’ 


expansion could be severely hindered if not 
enough thought is given to this in the early stages 
of office development. 


Other Considerations 

There is a great temptation to purchase a package 
simply because it is there, rather than because 
you think it will benefit your office procedures. 
Rather, it is best to go for a modulated approach 
that fits in with what you already have, that can 
fit in with the existing software, and that is not 
going to involve starting off a whole new system 
the minute it comes into the office. 

Whichever step you take is, of course, up to 
you. Rest assured that, wherever you start, it will 
not end there! 

This is why it is important, as we mentioned 
last month, to cultivate a good relationship with 
your dealer. A helpful dealer isworth his weight in 
gold, and can be an extremely useful man to talk 
with whenever you’re considering doing anything 
to your system, however trivial it may seem to be 
to you. 

Obviously, dealers are in for the money: quite 
simply, they have to be. We've all got to make a 
living somehow! But, if you establish that vital 
rapport with him, you’re far more likely not to be 
charged the earth for any particular job that re- 
quired doing. He knows, as well as you do, that 
given good service you'll be back again. 


Conclusion 

Buying a system (hardware and software), and 
especially for the first time, is not an easy deci- 
sion to make. Expanding that system is probably 
even more of a daunting task. 

It is no use plunging into the dark unassisted. 
Read all you can beforehand, and having acquired 
your original system cultivate that dealer relation- 
ship: you'll find it very useful. 
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Software Review 


DMS Diamond 


An estimated 20% of all Commodore PETs in- 
commercial environments have a DMS package, 
which probably makes DMS the top selling pro- 
gram in the U.K. Over 3,000 people are using it 
already, to handle some of the most diverse com- 
puter applications ever encountered. Some of the 
more standard uses include personel records, 
stock, library, student, policy, property, client, 
vehicle, medical and laboratory records, job 
costings and mailshots. Much more interesting to 
find are parish records stored on a computer, a 
refuse collection rota schedule, video library lists, 
and even a parrot breeders stock list! 

DMS stands for Data Management System, 
and any type of data may be stored on DMS. 
Once the data is on file it may be manipulated in a 
variety of ways. Perhaps the best way to evaluate 
whether DMS can help you in your business is to 
look at the data handling options of the latest 
release. The version under review here is the DMS 
Diamond, newly available and with the major dif- 
ference of offering users the ability to utilise data 
from two files simultaneously. 


Creating Your Record Layout 

When you first start with DMS you will have to 
tell DMS and the PET precisely what information 
you want it to store. You can allocate up to 40 
fields (lines) of information, and tell DMS whether 
those fields should hold numeric, date, or text in- 
formation. Instructions are simple enough to 
follow, and a typical file definition to hold a 
customer mailing list could be something like! 


DMS FILE NAME 
= Customer records 


— CLIENTS File Title 


Created 01/APR/82 Last accessed 15/JUN/82 
Records used + 78 


Company 1G 35 Address 1 2 C 30 
Address 2 3 C 30 Address 3 4 C 30 
Address4 5 C 30 Contact 62°C 30 
Salutation 7 C 3O"Co: Type’ S-C 30 
Last 

Bought 9 D 6 Last mailed 10 D 6 
Purchases 11C 250 Comments 12 CC 100 
Rep 13:¢ 10 Actionreq 14 C 100 


Up to 100 characters may be allocated for each 
record. This is a longer record length than other 
programs of this type (Silicon Office, for instance, 
has a maximum record length of 250 characters 
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per record). This means that quite a lot of detail 
can be stored for each item, person or company 
on file. DMS can create as many different data 
files as required using just the one program disk, 
which is a lot easire than some other packages of 
this type. 


Data Entry 

Records may be entered via a standard screen 
display, or via specially formatted screens drawn 
up by the user. This is a particularly useful option 
in that the order of the fields may be changed, 
fields missed out completely, longer operator pro- 
mpts inserted, calculations automatically per- 
formed etc. 

This option is called ‘MASK’ on the main menu, 
presumably because it superimposes a mask over 
the standard file definition. As well as being 
useful for data entry, this option also allows for 
recall, amendment and printing of records. 
Records may be added to the file at any time. 


Searching The File 
Although individual records can be _ recalled 
almost instantly, the fundamental use of a com- 
puterised filing system is the recall of batches of 
records that meet various selection parameters. 
These selection parameters (or search criteria), 
are sets of instructions defined by the user. For in- 
stance, if DMS is being used for personnel 
records, your search criteria could be all staff who 
are:- 
a) over a certain age 
b) not in the pension scheme 
c) on a salary over 9000 pounds 

Or in a customer mailing situation you may 
want to find:- 
a) all the customers who inquired into product Y 
b) haven't previously bought 
c) bought X and not Y 
d) have not been mailed for the last two months 
e) live in the London area 

As a final example, in an equipment servicing 
schedule, to find all the equipment where the 
machines:- 
a) are due for servicing on or before a certain date 
b) are in location X 

Up to eight selection parameters are usable at a 
time, and any number of different sets may be us- 
ed. Each selection parameter may be connected 
with ‘and’ or ‘or’ to the others, and DEM will 
search for information equal to, not equal to, or in 
a range of certain information. There is no need to 
allocate separate fields for each bit of information 
as DMS does ‘free text searching’, so long 
descriptive fields can be scanned and records 
found, even if the crucial information is embedded 
in a long text field. 
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Software Review 


For numeric information, these search criteria 
are extended to less than, less or equal to, greater 
than, etc. DMS also has a true date searching op- 
tion, to find either all dates between two dates, or 
all dates before or after certain ates, using the 
whole or just part of the date. 

Sets of search criteria can be stored on disk, 
and then the relevant records used either for prin- 
ting lists, labels, merging with standard letters, 
processing in various ways, or merging with other 
data items. : 


Sorting 

DMS will sort records into order. It sorts either in- 
to alphabetic order, numeric order or date order, 
or combinations ofthese. Sorts are rapid: bet- 
ween 100 and 200 records on a floppy system, 
and up to 2 or 3 times faster using a hard disk. 


Printing Time 

Either the whole file or information may be 
printed, or you can use pre-selected, and/or pre- 
sorted batches of records. Any print format can 
be produced. As the tailored reporting option is 
fairly difficult to learn compared with the rest of 
the program, it is nice to find a powerful ‘stan- 
dard’ reporting facility, which allows for tabular 
printouts, field ommission, totals etc. 

Most of DMS seems to be easy enough to use 
without a manual, and there is a tendency to be 
lazy about manual usage. However, reference is 
vital for the production of tailored reports. 

The letter writing option was much easier to get 
to grips with. Text can be typed directly onto the 
screen, and information from the records 
automatically merged as the records are being 
printed. For anyone wanting a selective mailing 
program, DMS seems ideal. Either continuous or 
single sheet stationary can be used, with or 
without a cut-sheet feeder. Any number of let- 
ters, up to three screen fulls in length, can be 
created by DMS and stored on disk. 

Self adhesive labels can also be printed, using 
the same names and addresses. Although per- 
sonalised letters are a strong feature of DMS, 
many commercial users, such as mailing list com- 
panies dealing with vast numbers of enquiries, 
could simply use it to search the files and print the 
labels. 

As well as all the print options, DMS will show 
the records on screen, count the records which 
meet the selection parameters, and print or 
display the totals. 


Links to Other Programs 

DMS also has, as standard, links to various PET 
wordprocessing packages such as Wordcraft, 
Wordpro and Superscript. These were originally 
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offered to complete the ‘select and mail’ system, 
now dealt with by DMS as a stand alone package. 
Other links include one toVisicalc, useful for 
statistical analysis of data, and there is an open- 
ended link to user written software or other com- 
mercial packages using sequential files. One final 
one currently under review is a link to the much- 
praised Pegasus accounting package. 


Multi File Referencing 

The greatest difference between DMS Diamond 
and earlier releases is the ability for Diamond 
users to access two files simultaneously. This 
means that standard information stores on one 
file can be drawn into another file on a record by 
record basis: a useful facility for anyone using 
fairly static information in other more lively files, 
such as invoicing etc. 

A similar facility is offered to people who have 
sets of numeric information to be introduced into 
records for computations or for textual insert. 
This is useful for exchange rate analysis, discount 
structures, prices etc., or wherever numeric rates 
apply. 


Mathematical Processing 

Either the whole file, or pre-selected groups of 
records, can be processed in a variety of ways, as 
DMS has a full commercial calculation program as 
part of the suite. Fields of numeric information 
can be totalled, sub-totals produced, fields may be 
added, substracted, multiplied or divided with 
each other or with constants. These functions 
can be used for batch price increases, salary 
changes, discounts, commissions, VAT totalling, 
sales figures, etc. Thus useful management infor- 
mation and projections can be produced. 


Conclusion 

The DMS Diamond, now offering multi-file 
referencing capabilities, looks to have overcome 
the major drawback of the 1981 release of DMS. 
This, plus a new facility for changing the search 
criteria quickly, makes DMS a powerful and com- 
prehensive package, and useful for a number of 
different applications. 

Compsoft have succeeded in maintaining a sim- 
ple and straightforward program for the first time 
computer user, without loss of flexibility. 

For further information Compsoft can be reach- 
ed at Hallams Court, Shamley Green, Near 
Guildford in Surrey, or by telephone on Guildford 
(0483) 898545. 
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“no programming experience necessary” 


Write your data base applications in 
minutes instead of days. Dynatech 
Microsoftware introduce to PET owners 
the CODEWRITER, a superb program 
generator for the 8000 series Pet with 
8050 disk drive unit. 

Screen layout, data entry validation, 
screen display of user-defined error 
messages, screen calculations, searching 
by any field - all are child’s play to 
Codewriter Disk 1. Codewriter Disk 2 
provides printed reports and menu 
generators. 


“INSTANT ROM” 


‘Instant Rom’’ ROM/EPROM EMULATORS contain CMOS RAM with inter- 
nal battery backup. When the power is switched off, data is retained for up 
to 10 years. 

In the PET, a 4K INSTANT ROM can be fitted in the $9000 or $AO000 
socket. Machine-code (and Basic) programs can be stored, and are available 
at switch-on. 

INSTANT ROM saves time. It can be used for long periods; when the pro- 
gram is finally ‘‘bug-free’’, an EPROM can be programmed. 

4K INSTANT ROM (ROM socket replacement) 

2K INSTANT ROM (character generator replacement).... 

Adaptor GA1 (essential for PET users) 


A selection of the applications of 
Codewriter already in use are listed 
below; 

Data entry storage and retrieval of; 
(a) personnel records 

(b) product information 

(c) rental records 

(d) customer data 

Stock control systems 

Letter/word information 

Hotel reservations systems 

Fixed assets and depreciation schedules 
Projects records and control systems 
Mailing and labelling systems 


“G-ROM E” 
G-ROM E is a 4K EPROM which will Auto-run, at switch-on, any Basic or 
Machine-Code program stored in INSTANT ROM. Basic programs can be 
stored with a few quick key-strokes. No skill is needed: Programs can now 
be run without a tape or disk unit, and can be changed without cost to the 
user. Diagnostic aids are included. 
G-ROM E (specify type of PET) 


Postage (£1.00) and VAT are extra. Leaflets are available. 


“INSTANT ROM” and ‘‘PETCLOCK”’’ are COMMODORE APPROV- 
ED PRODUCTS. 

GREENWICH INSTRUMENTS LIMITED, 22 BARDSLEY LANE, 

GREENWICH, LONDON SE10 SRF, UK. Tel: 01-853 0868. Telex: 

896691 Attn. GIL. 


Turnkey training courses are always 
available at various Centres throughout 
the U: K., or take a holiday course in 
the charming island of Guernsey. 

For full details on courses and inform- 
ation on Codewriter, write or ‘phone 
NOW! 

Dealer enquiries welcome — we are 
appointing them fast! 
Codewriter Disk 1 - £125 
Codewriter Disk 2 - £65 


DYNATECH MICROSOFT WARE LTD. 


SUMMERFIELD HOUSE, VALE, 
GUERNSEY, CHANNEL ISLAND. 
Tel. 0481 47377 Telex 4191130 











A Commodore approved product. 


Specially designed to take any Commodore Pet system. 


Black leathercloth top and Black metal frame. 
Paper feed tray, top extension shelf. Concealed 
cables and 4 way 13 amp plug socket. 

Mounted on castors. Size 1470 x 560 x 675 mm. 
Delivered flat packed. 


Price £189.50 includes VAT and delivery. 


This offer available UK only. Cheques with order to: 
Tirith Ltd, Pear Tree House, 

Woughton on the Green, Milton Keynes 
MK6 3BE. Telephone: (0908) 679528 
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Hardware Review 





Mini Digital Cassette Recorder 


Many users of Vics (or Pets for that matter), 
who have been using cassette decks as a storage 
medium, must have yearned for the speed and 
capacity of disk drives. 

Of those, almost as many must have given up 
in despair at the relatively high price of these units 
compared to the basic computer. The Vic disk 
drive, for instance, retails at- just under 400 
pounds, in other words almost double the price of 
the Vic itself! 

This is clearly a ludicrous situation, but one 
which regrettably has had no straightforward 
solution. Tapes are slow, but cheap, and disk 
drives are fast, but expensive. However, to the 
rescue of all those who want to store more, and 
retrieve it faster, Currah Computor Components 
in Cleveland (tel. 0429 72996 for further infor- 
mation) have come along with their Currah 220M 
Digital Recorder, or to you and me a digital 
recorder that uses mini cassettes. There are ver- 
sions of the 220M for 3000/4000/8000 series 
Pets, and for the Vic 20. Here we take a look at 
the Vic 20 model. 


Appearance 

Considering that the cassettes used are a mere 
55 millimetres by 32 millimetres, the unit looks 
rather large in appearance when placed next to 
the Vic, measuring in at 230 x 220 x 110 
millimetres. Nonetheless it does fit in 
ergonomically with the rest of the Vic hardware 
range. 

One major complaint is that there is no ON/OFF 
switch anywhere on the machine: this action has 
to be performed from the mains, which is rather 
annoying if you've spent hours trying to work out 
which plug is which, and then switched the 
wrong one off! Still, it does arrive with a plug fit- 
ted: more than can be said of many other 
manufacturers. 

Also included in the price of 129.99 pounds 
(excluding our old friend VAT), is post and pack- 
ing, a free cassette, the aforementioned plug, and 
a small, but excellent, manual. 


First Steps 

Most important of all, make sure that the 220M is 
switched on before attempting to initiate the 
television/Vic switching on sequence. If you 
don’t, your Vic will power on all right, but the 
display will look rather alarming, with the familiar 
blue letters boasting ‘Commodore Basic’ etc. be- 
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ing replaced by multicoloured ones, and one or 
two disappearing altogether. 

Connection to the Vic is via the memory expan- 
sion port, the manual procaliming that you make 
the connection with the Currah logo uppermost 
on the connector. Well, unless their logo has been 
changed to the words ‘Vic 20’ you won't find 
one! Having made the connection, a single SYS 
command produces the words CURRAH CTOS on 
the screen, and the 220M is ready for action. 

Incidentally, if you already have cartridges etc. 
fitted to the memory expansion, you need to get 
into expansion unit mode (Commodore, Arfon 
etc.), whence it will work quite happily. 

The first thing the manual (quite rightly) recom- 
mends that you do is to check out the unit, mak- 
ing sure that it is installed correctly, and working 
to your satisfaction. A number of simple Peek and 
Poke commands suffice for a rough check, but 
these are mostly designed to ensure that the 
physical workings of the tape drive are operating 
properly. 

To get a better guide to the actual unit's perfor- 
mance, an introduction to CTOS Basic is then 
given. 


Storage 

Having discovered that there will be an error 
reported if you attempt to rewind a cassette 
without a cassette present, one gets onto more 
esoteric subjects such as formatting a directory 


for a data tape that will use files of length 256 
bytes. 





‘They're Kinda Cute Once 
You Get Used to Them.’ 





It is recommended that data tapes and program 
tapes are kept separately, as the cassette data file 
pointers would become corrupted, which would 
in turn corrupt any programs that might also be 
present on the tape. 

Data files can be kept in multiples of 256 bytes, 
up to a maximum of 1280 bytes (the equivalent 
in 220M terms of 182 numeric variables), and it 
is this which determines how much information 
we can store on our mini-cassette. At the largest 
size we can have up to 40 files stored on one side 
of the tape, giving us a storage capacity of 50K. 
Of course, being nothing more wonderful than an 
ordinary cassette tape we can use both sides, to 
end up with a total capacity of 100K per tape. As 
mentioned, Currah do provide you with a free 
tape in the price. 

In terms of storing programs, it is best to keep 
to programs that are a minimum of 200 bytes 
long (not too difficult to achieve), as the CTOS 
language cannot handle the extremely slight 
movement of the tape required to save such a 
small program. 

The format of the directory is rather simple: it 
just tells you the equivalent of the disk header, 
and the names of any programs that are on there. 
Another reason for keeping programs and data on 
separate tapes! To find out how much room you 
have left on any one tape is not presented to you 
automatically, but is easy enough to discover. Nor 
are you told how long any particular file is: rather, 
you have to find this out for yourself. 


New Language 

Currah CTOS adds an additional 21 commands to 
the existing Vic Basic, all designed to be used in 
conjunction with the 220M. In other words, you 
donb’t get commands repeated that can be found 
elsewhere, such has Help, Renumber, and all the 
other usual additions. 

All are prefixed by the ‘@’ symbol, and have 
been designed to be as easy to remember as 
possible. Thus a directory load becomes @DL, 
verify becomes @VE, and so on. 

Those of you used to tapes (and to a lesser ex- 
tent disks) will be pleased by the relative (sorry!) 
ease with which data can be stored and retrieved. 
Very simple commands allow’ storage of 
variables, both numeric and alpha, and calling 
these back can (interestingly) be in any order. I.E. 
if you've saved, say, two alpha and three numeric 
variables in that order, you do not have to read 
back the two alpha first if it’s the numeric you're 
after: you can just go straight to the numeric. A 
type of random sequential filing system | 
suppose! 

A number of useful routines exist within these 
commands (append a basic program to one 
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TODAY'S HEADACHE 





already in memory for instance), and in describing 
them the manual in turn gives some further ex- 
tremely useful information for use when using the 
220M: how string variables are stored, Pokeing in 
data, saving machine code, and so on;. 

Commands such as read block, write block 
etc., mean that sequential file handline is now 
(inexpensively) within our grasp. Sample program 
listings included cover this, and we can find out 
about such things as creating files and inputting 
data, accessing files and retrieving that data, 
storing names and telephone numbers (now 
there’s an unusual example!), saving and re- 
loading screens of text, all of which are 
reasonably straightforward. 

Various built-in error trapping routines and com- 
mands complete a versatile package. 


Summary 
The Currah 220M Digital Recorder is an efficient, 
low cost entry into the world of faster storage 
media. At a price of under 130 pounds it will be 
welcomed by all those who~-would previously 
have baulked at purchasing a disk drive, but 
would love to make the next step up from 
cassettes. 

If we’ve not been overly technical here it’s 
because we believe that for this sort of unit you 
want to know if it’s value for money (which it is), 
and if it competently performs the tasks expected 
of it (which it does), rather than knowing how 
many millimetres of tape are used per K of 
storage. If you want to.find that out you can 
always ring the number mentioned earlier: Currah 
are a very helpful company, and at this point I'd 
like to thank them for the loan of the: machine, 
and the help and advice offered along the way. 

In the end of course we’re down to the old 
question of you pay your money and you take 
your choice. If you can afford a disk drive | would 
not recommend you buying this unit. On the other 
hand, if you (or your bank manager) can’t make 
that step just yet, but cassette decks are driving 
you around the bend, this is certainly worth look- 
ing at. . 

To conclude in a single sentence, this is very 
good value for money. 
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Book Review 


At a rough guess there are some fifty million 
books on the market at the moment, all purporting 
to teach you how to use a Pet. Some are better 
than others: here we take a look at one that isn’t, 
namely Learning to Use The PET Computer, by 
Garry Marshall, and published by Gower Press at 
6.45 pounds. 


Learning to use the PET Computer 

One mustn’t blame Garry Marshall totally for this 
book. Other contributors included Michael 
Fluskey, of Gower itself, and Peter Wayth, head- 
master of a school in North London. 

In his foreword, Mr. Marshall states that really 
basic, introductory books for the Pet are in short 
supply, and he is quite right. There is certainly a 
demand for a good, down to earth, book that 
takes you all the way from switching the machine 
on, to programming the beast in machine code. 

Books such as Ray West’s Programming the 
Pet/CBM, and the Pet/CBM Personal Computer 
Guide by Adam Osborne and Carroll Donahue, are 
probably the best that there are available in this 
field at present, but experiments with total 
newcomers to Pets (and perhaps more important- 
ly computers and computing in general) convince 
me that both those publications tend to leave peo- 
ple far behind. 

Don’t get me wrong, they are both excellent 
books, but there is nothing for the complete tyro. 

So Mr. Marshall is quite right. However, having 
stated his aims it is a shame that Learning to use 
the Pet Computer has ended up the way it has. It 
is a slim volume, coming in at just 87 pages, 
which immediately compares unfavourably with 
the two mentioned earlier, both of which hover 
around the 500 page mark. 

Given 87 pages, one then wonders why so 
many of them are devoted to an introduction to 
the history of the Pet, and a very airy-fairy over- 
view of Pets and their uses. Fascinating stuff no 
doubt, but it certainly didn’t tell me how to use a 
Pet computer. 

Indices, forewards, etc. leave us with a bare 58 
pages: certainly not enough. The appendices 
leave out far more than they put in, and are the 
briefest of brief overviews of the software and 
hardware scene. Far better to have left this out, 
than to have bothered wasting space that could 
be used to much greater advantage. 


Content 

When you actually get into the meat of the 
book, it certainly does a lot of jumping about. 
Commands are introduced at random, with little 
or no explanation, and many of the program 
listings perform no useful purpose. 

In its defence, the book has got a number of- 
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things right. For instance, the program listings are 
clear in the extreme, and they've adopted the 
standard put forward by Computing Today (is this 
why he states in the back of the book that ‘I con- 
sider this the best of the popular computing 
magazines ?) for explaining the various graphic 
symbols that appear when cursoring left, revers- 
ing field etc. : 

Thus, what listings there are are pretty easy to 
follow. | just wish.they did something! 

Again in defence the book does give a glance in 
the direction of most of the things that can be 
done on a Pet. Graphics, business programming, 
a quite good section on flow-charting before div- 
ing off to produce some code, and indeed a 
(very!) brief look at some of the special Pet 
features: user port, memory maps, internal tim- 
ings etc., but again these are so brief as to be not 
worth bothering with. 


Summary 

It is a clearly put together book, well illustrated, 
well laid out and designed, however ...! To quote 
Groucho Marx, ‘It was one of those books that, 
once you'd put it down, you just couldn’t pick it 
up again’. 

| don’t like being this damning of a book, par- 
ticularly one whose aims are as good as this ones 
are. Unfortunately, it really doesn’t work at all. 
Too little time is spent explaining just how to 
‘Learn How to Use a Pet Computer’: you certainly 
wouldn’t learn how to program from reading this 
book. 

It is supposedly part of a series: the idea is 
there, it is a good one, and let us hope that the 
rest of this series improves on this beginning. One 
final point: don’t charge 6.45 pounds for an 87 
page book. Just about every computer magazine 
on the market is bigger than that, so | don’t really 
think it’s justified. 


PET/CBM Personal Computer Guide 

Since the explosion of the microcomputer, hun- 
dreds of books have been brought out for the top 
computers: Apple, PET/BCM and Tandy. Ob- 
viously they differ in quality and quantity, some 
are brilliant where as some should really never 
have been written. This one, PET/CBM Personal 
Computer Guide, is in the former category. 

This is the second edition and is an update on 
the original, covering the newer Commodore 
Computers; the 4000 and 8000 series PETs. 
This edition, written by Adam Osborne and Carroll 
S Donahue (the authors of the original book), 
gives an indepth coverage of cassette drives, 
floppy disk drives ( both the 2040 and 8050 
models), two printers, the 2022 and 2023 


models, and a much expnaded tutorial on the 
Basic language. ; 

The book gives the beginner 500 pages of 
highly informative information on the computers 
themselves plus peripherals as well as recent (for 
1980) operating software: Basic 4.0 and the Disk 
Operating System DOS 2.1 and DOS 2.5. 
Everything the serious CBM computer user wants 
to know can be found in this book, described in 
minute detail from a clear and consise introdution 
on the original PET through to extensive informa- 
tion on editing functions on the 8000 series 
systems. 


Chapters One to Four : The Background chapters 

The first three chapters are concerned mainly 
with the basics of the CBM range (and covering 
everything in the first book), ie., 2001/8K, 8N, 
16N and 2001N/32N, prior to introducing you to 
the new 4000 and 8000 series cassette -units 
and tapes, disk drives and floppy disks and the 
printers. The second chapter introduces you to 
immediate mode: using the PET as a calculator, 
and then into program mode, etc. Chapter three is 
all about screen editing: some of the information 
here had been covered in the first book, but it is 
essential to repeat it if the user is going to fully 
understand the update from Basic 2.0 to Basic 
4.0 and the screen editing functions involving 
Basic 4.0 with the 12 inch monitor Pets. 

_ The first three chapters having got you well ac- 
quainted with the PET and its basic functions, | 
chapter four begins to teach you how to program 
on the PET: something it does concisely and very 
extensively, leaving nothing out. Fifty pages are 
dedicated to this task, with sub-chapters on 
Elements of a Programming Language, Basic 
Statements; Subroutine statements and PEEK 
and POKE statements being just a few of these, 
and a Functions sub-chapter covering Arithmetic, 
String, System and User Defined functions. 


Making the Most of CBM Features 

The heading explains itself, and here nearly one 
hundred pages-have been given over to indepth 
instruction on Hardware Features, String Con- 
catenation, Input and Output programming, 
mathematical programming, graphics and Ran- 
dom Numbers. Again they have left nothing at all 
out. 

A chapter on peripheral devices describing their 
various uses and how to get the most out of them 
is given approximately one hundred pages. Yet 
again this is comprehensively presented. Do this 
team ever make mistakes?! 

The final two chapters cover System informa- 
tion and CBM Basic. Such topics as Memory 
Maps and Basic Statement Storage are given 


coverage, as well as Assembly Language Pro- 
gramming. Basic statements, Functions and 
8000 Editing Functions are given sub-chapters of 
their own with nearly fifty pages of information 
and instruction for the user. 

Finally we come to the Appendices. 

These are incredibly detailed with many tables 
of figures, clearly printed but perhaps a bit small 
and slightly apt to cause confusion if you should 
accidently drop down a line by mistake: book 
publishers should provide magnifying glasses! 


Summary 

Here is a book so well thought out that you 
should not need any other to teach you about the 
PET. It costs a mere £10.95, and for a book that 
covers all it does, in such depth, £10.95 is very 
good value for money. The contents are well set 
out and clearly defined; the print is clear and so 
are the diagrams; the listings are not too long and 
are a direct copy from the machine, thus giving 
less chance of error. 

The authors have put this book together ex- 
tremely carefully, and have taken great care not 
to skip about from one subject to another. As far 
as | am concerned, unless you’re the kind of per- 
son who's going to. spend the rest of their lives 
locked up in a garret, programming in machine 
code and designing ever more complicated boards 
and circuits, this is an extremely useful guide to 
becoming a competent PET/CBM user. 

It is printed by Osborne/McGraw-Hill in 


Berkelye, California, but is readily available from 


all top computer book shops. 
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Guest Expert 





An old ROM version of the Commodore DOS 


Support Program 


In my last article | described a machine code 
routine to enable loading and saving disk pro- 
grams when using an 8050 Disk Drive in conjunc- 
tion with an Old ROM PET. Although the system 
works well in the described form, it requires the 
additional OPEN and SYS commands which are 
not necessary when using the later ROM PETs. 
When Commodore introduced the Disk Drives 
they also produced a DOS Support Program 
which simplified the Load and Save commands, 
allowed a simple method of passing commands 
direct to the Disk and displaying the contents of 
the Disk directories. In its published form, the 
DOS Support Program would only run on later 
ROM PETs as it accessed various routines in the 
Basic interpreter. As | wished to take advantage 
of the above facilities when using an 8050 Disk 
Drive on my Old ROM PET, | converted the 
published program and the following are details of 
the final result. It must be pointed out that the 
converted routine will only run on Old ROMPETs 
and the Disk Load/Save routine described in the 
previous article, must already be loaded into 
Cassette Buffer 2. 


The DOS Support program 
The Commodore DOS Support Program consists 
of four component parts: 
(i) An instructional Basic component to display 
program operating details. 
(ii) The actual DOS Support Program in machine 
code. 
(iii) A relocation routine to place the DOS Support 
Program at the top of available store and adjust 
the top of the store pointer. 
(iv) A universal Wedge routine to couple into the 
normal Basic Interpreter routines. 

In its currently issued form, the DOS Support 


Program is issued as a Basic program with item (i) 


above written in Basic and followed by items (ii), 
(iii) and (iv) in machine code but contained within 
the area of the whole Basic program, i.e. the End 
of Program/Start of variable table pointers are set 
to after item (iv) above. As will be appreciated, 
the number of changes necessary to run on the 
Old ROM PET, were considerable and in order to 
allow an easy presentation in this article, the pro- 
gram is shown as a complete Basic program. The 
machine code is contained in Data statements for 
poking direct into their final locations. Figure 1 
shows the complete Basic program and the user 
is advised, after input, to save the program on 
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Disk (using the Load/Save routine in my previous 
article) or tape before running, as one mistake in 
the Data statements will cause the PET to crash. 


Details of the Basic DOS Program 

Referring to Figure 2, lines 5 to 270 contain the 
instructional lines displayed once the DOS Sup- 
port Program has been loaded into the top of 
available store. Lines 510 to 580 contain the 
Data statements for relocation and Wedge 
routines, whilest lines 1010 to 1330 are the ac- 
tual DOS Support Program Data statements. It 
will be noted that the relocation and Wedge 
routines are loaded into locations 634 to 752 
which are within the Cassette 1 Buffer. This is no 
problem as, after setting up the DOS Support Pro- 
gram, this code is no longer needed. Figure 2 is a 
disassembled print of the relocation and Wedge 
routines when loaded into Cassette 2 Buffer. 
Figure 3 is a disassembled print of the actual DOS 
Support Program shown loaded into the top of an 
8K RAM although the program is relocatable to 
the top of any available RAM i.e. there could be 
another routine above the DOS Support Program. 
For those who are interested in more details of the 
code employed in the above routines, reference 
should be made to Commodore PET Users Club 
Newsletter, Volume 2, Issue No. 1 which con- 
tains full details of the standard DOS Support Pro- 
gram. The prime changes between the Standard 
and Old ROM versions are in Basic ROM 
addresses. 


Using the Old ROM Version of the DOS Support 
Program 

All the facilities offered in the standard PET 
DOS Support Version 4.0 are available in this Old 
ROM version with the addition of a Save program 
to disk command. In offering the Save program to 
disk facility the command character @ is used 
and therefore it is no longer an alternative to - 
which was introduced for business keyboard 
PETs.= 


Example. (to save a program) 
type: @PROG where PROG is the. 
name of the program to be saved. 

The operating instructions for the Old ROM 
DOS Support Program are displayed on the screen 
when it is run and are also contained in the Com- 
modore Disk Manual (with the exception of the 
Save facility described above). The constraints on 


using INPUT and GET commands in conjunction 
with a DOS Support Program (referred to in some 
Commodore publications) do not apply to the Old 
ROM version. The standard Commodore DOS 
Support Program includes the ability to print the 
Disk Directory direct to a Commodore printer. 
This code has been converted and included in the 
Old ROM Version but never tested as | do not 
have access to a Commodore printer. | would like 
to hear from any user of this facility in this Old 
ROM Verison just to set my mind at rest that it 
works. 
Using other than 8050 Commodore Disk Units 
Although the Old ROM DOS Support Program 
and the Load/Save routine in my previous article, 
have only been tested on an 8K Old ROM PET us- 
ing the 8050 Disk drive, | see no reason why the 
routines should not work on other Commodore 
Disk units provided they use the standard Com- 
modore IEEE interface as do the 2040, 3040, 
4040 and the latest single drive unit 2031. As 
thePET has no knowledge of the disk unit type at- 
tached and only produces character strings which 
are sent over the IEEE interface, | see no reason 
why there should be any compatability problems. 
| would like to hear from any reader who has the 
facilities to try alternative units. 
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How to buy a word processing 
program... 












First, go to your CBM/PET dealer and difference in price on return of the other 










see at least two wordprocessing programs. program. 

Second, make sure that one of those you So don’t be talked into a very expensive 

see is a WORDFORM from LANDSOFT. program until you have satisfied yourself 
We are serious when we Say: you that one of the WORDFORMs will not do 

should see more than one. Everyones all you want. Buying another program and 

wordprocessing requirements are then becoming aware of the WORDFORM 

different. You will want to ensure that the excellence would be most frustrating. 

package you buy will do all you require. WORDFORNM versions for 3032, 4032 

But also you will not want to pay for and 8032 £75 + VAT. 

functions you don’t need. WORDFORNM II for 8032 only £150 


There are two LANDSOFT word- 
processors — WORDFORM and 
WORDFORNM Il. They are both 
exceptional programs. You 
may well find that WORD- 
FORM will do everything you 
need, but should you ever want 
to update to WORDFORNM Il, 
we will always supply forthe 


+ VAT. 
















LandSoft 


28 Sheen Lane, 
London SW14 8LW. 
Telephone: 01-399 2476/7 


SUPERIOR PROGRAMS FOR THE 
CBMI/PET MICROCOMPUTER 
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ANOCTICETOALL 


PET LOVERS 


INTRODUCE YOUR PETS TO OURS 
AND SOLVE YOUR INTERFACE PROBLEMS 





ANALOGUE/DIGITAL I/O 


THE PUPI 


4 ANALOGUE INPUTS (12BIT) 

2 ANALOGUE OUTPUTS (12 BIT) 
4 RELAY OUTPUTS 

4 LOGIC INPUTS 


+e + & 


When connected to the “PET” User 
Port the PUPI gives you all the above 
features together with an operating 
system in EPROM, which interacts 
with Basic’s variables, giving extremely simple 
operation. Inputs and outputs are +10V and relays 
are rated at 10VA. Logic inputs can be used for 


Only £195.00 microswitch sensing etc. 
HIGH SPEED A/D CONVERTER 


THE PUSS! 


Wr * 4 ANALOGUE INPUTS (12 BIT) 

¢ Q ® $ 4 * 50 MICROSECOND CONVERSION 
==KS, 
/ 





\ \ * STOP AND START TRIGGERS 
of * DATA ACQUISITION SOFTWARE 


{ 
i 
1h Using an operating system in 

] EPROM, the PUSS! provides a high 
| | fy speed A-D Converter with 4 
ce vy, tod multiplexed inputs, which is under 
control of either software, or remote start/stop 
triggers. A-D Conversion can be carried out from 
Basic, or Machine Code, with up to 1500 readings 
Only £195.00 entered directly into memory at a_ software 

determined rate. 


CIL MICROSYSTEMS LTD. 
DECOY RD., 
WORTHING, 

SUSSEX BN14 8ND. 


TELEX: 87515 WISCO G ATTMIC 
TEL: (0903) 210474 








Write, phone or to 
obtain further information circle number 





MICROSYSTEMS LTD 
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A Year in the life of a PET 


A piercing scream echoed along the darkened 
corridor, dying away as quickly and mysteriously 
as it arose. ‘‘Oh dear’’, sighed the typist in a 
resigned manner. ‘That must be the tenth time 
’ today his new program:has crashed ....’’. 

Actually it's not been quite as bad as that but | 
have been pretty near to screaming on many oc- 
casions, while on just the odd occasion | even 
started wondering what life must be like in a 
monastery far away from printers that won't 
print, disk drives that won't drive and computers 
that won't! 

| work in a small local authority planning depart- 
ment in what is known at the Local Plans section. 
Basically my job, in a team of three others with a 
section head, is to prepare the forward planning 
policy statements: for the district, and to keep 
track of a-fair amount of statistical information — 
much of this is used in the preparation of ‘‘Loca 
Plans’’. 

About a year ago we managed to convince our 
boss and the Council’s treasurer of the merit of 
some form of computer system to handle this 
data. We ended up with a 3032 computer, 3022 
printer and 3040 disk drive. 

There was nobody in our department with any 
programming expertise — we were well and truly 
on our own. 


Programming the Computer 

| elected to familiarise myself with programming 
the computer, and set about the seemingly 
awesome task. Though it may seem a paradox | 
found that by typing in games listed in magazines 
| managed to learn a great deal. It was, however, 
a process of trial and error. | began to write what 
now seem incredibly simple little programs: such 
things as a conversion program for 
‘metric/imperial or simple modelling projects 
where one could input and alter certain 
parameters to ascertain the net effect in, say, a 
population projection. Other programs were 
perhaps outwardly less useful but were of great 
interest to me, enabling me to become more profi- 
cient with screen graphics, presentation etc., or 
helped me to learn more about the PET and its 
built-in functions, and increased my knowledge of 
Basic programming such as string handling, loops 
etc. 

The machine had now been in the office a cou- 
ple of months and it was becoming increasingly 
obvious that | had to start producing the ‘goods’, 
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_ Mouse/Maze_ program 


machine’s workings and organisation, 


if only to justify the expenditure! | realised that 
without a proper knowledge of disk file handling 
routines | was completely stuck. | was to remain 
‘stuck’ for quite some time — certainly in respect 
of random access files. 


First Venture 

My first venture into disk file handling was with 
sequential data files, and my first real success 
came when | managed to convert the 
(Practical Computing, 
February 1980) for writing the maze ‘data’ to 
disk instead of to tape. 

| then started to write my first truly work orien- 
tated programs. These were designed to handle 


‘statistical data to be stored on disk rather than in 


numerous files littering the office. They were 
relatively simple programs with very limited error 
correction capabilities. Data was entered into a 
two dimensional array consisting of some 400 
plus entries. After only a couple of attempts at re- 
typing in all that data following mistakes | rewrote 
the program to put the data into separate one 
dimensional arrays, identified by the year, which 
were then individually written to disk. These se- 
quential files of population statistics, dwelling 
stock, housing completion rates etc. were 
gradually built up. 

The ‘Read’ program was intended to access 
those sequential files and to perform simple 
statistical calculations, Unfortunately | have to do 
all the work on the PET in my spare time, which is 
little enough during the day — in fact | used to 
take the machine home only to work into the 
small hours — with the result that this first series 
of programs was never completed. At least the 
disk accessing routines worked! 


Breakthrough 

The real: breakthrough came when | bought 
myself Nick Hampshire’s books ‘The PET Reveal- 
ed’ and ‘The PET Library of Subroutines’. These 
helped in three main ways:- 
a) They gave me an insight into some of the 
which 
though not vital information certainly helped me 
to understand better what | was doing. 
b) They provided very useful routines which | 
could use in my own programs directly (e.g. the 
Random Access routines), or indirectly using the 
machine code routines located at the top of 
memory to enhance displays etc. 


c) They opened up the world of random access to 
me! 

| then started work on a series of programs to 
store and manipulate a large volume of data 
relating to the availability of land for residential 
development. This information, which is kept on 
ordnance Survey sheets and various schedules, is 
required for a number of reasons. Perhaps the 
most demanding and time consuming of these is 
to complete twice yearly a government return 
(inown as PS3), which required a search through 
all of the recorded information to produce sum 
totals under various categories and headings. 

A more interesting use ofthese figures is used 
internally in the department to plot how the hous- 
ing needs in different parts of the district are be- 
ing met, and to see what the effects are likely to 
be on the population totals and the level of ser- 
vices in various settlements due to changes in 
their commitments to residential development. 

The need was for a data handling system that 
would manage a fairly large amount of numerical 
and verbal data, be able to select and analyse dif- 
ferent sections of that data, do user controlled 
searches on specified parameters, print out 
’ various schedules, and produce models/projec- 
tions given differing inputs or situations. 


The Start! 

| very naively started to write one program to 
do the lot, having options in the form of a menu to 
input new data, update existing data, read data 
off the disk given the search parameters, 
manipulate data, print schedules, compile a PS3 
return, and so on. To make matters worse | has 
also tried to input all of the selected records into 
memory from disk for a specific task. | very rapid- 
ly ran out of memory space! | had mistakenly 
assumed that the DIM _ statement actually 
allocated the space for the arrays themselves, 
and when checking for FRE memory after execu- 
tion of the DIM assumed there to be plenty of 
room. | have since then twigged what actually 
does occur! 

Major modifications were required. | suspect 
that trained programmers would have thought out 
all the requirements of the program quite 
thoroughly and would have drawn up complex 
flow charts. Whilst | see the merits in that, and 
make serious attempts to do just that, the work at 
the keyboard and the ideas which came. while 
working and running the program soon overtook 
any flow-charting | had managed. Needless to say 
| spent many hours, often into the early hours, re- 
typing vase sections of program, often for the 
most ludicrous of reasons. 

The eventual outcome was a suite of programs, 
sad to say still incomplete for lack of time, which 


are specific to the major functions listed above. 
These programs are all linked and will call other 
programs in the suite on a single key stroke. | 
have toyed with the idea of using a single set of 
subroutines and loading only the variable parts of 
the program, calculating the link address and so 
on. However, | have chosen to write each pro- 
gram complete with the common subroutines so 
that | need only alter memory locations 42/43 
(decimal). In some future work | think | would like 
to try the first option to enable variables and ar- 
rays to be passed on, but that must wait! 

All the programs in the suite were designed 
with the lay user in mind. They use similar for- 
mats and screen presentations. From the pro- 
grammers’ point of view | have tried to be consis- 
tent too. They are all structured around the same 
subroutines, and by and large use the same 
variable/array names. Line numbers are grouped 
so that, for instance, all disk read/write routines 
occur in lines 50000 to 59999 while common 
routines handling certain. display, error trapping 
and other functions are all from 60000 onwards. 

| have even gone to the extent in one case of 
using the lines 40000 ta 49999 for all hard copy 
output routines because the printer happens to be 
device number 4. The programs also use a 
number of machine code routines to draw a 
border around the ‘menu’ to flash the prompt 
message, to print out the screen display to the 
printer etc. | am now just at the stage of examin- 
ing ‘‘PET Graphics’’ to see whether | can use any 
of those routines.! 


Work So Far 

The main programs in the suite are Menu, Input, 
Read, Update, PS3 and a couple of system 
backup programs. The input and update programs 
construct a key file which contains a string of 
data for each record on the random access disk. 
The main purpose of this is to keep track of the 
relative record number. The rest of each string 
contains extracts of the main data to enable sear- 
ches to be carried out on a form of ‘sieve’’ 
approach. 

This allows the user to select a number of 
parameters which will be looked: for in the pro- 
grams’ search routines. The result is a list of 
records whose data accords with the search 
parameters. The read program then uses this list 
to find the relative record number, calculates the 
track and sector number of that record, and reads 
it into memory. Depending on the function being 
used a further check can be made on parts of the 
data not in the key file to ensure that this record 
should in fact be used by the program for the 
designated purpose e.g. printing schedules, giv- 
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ing totals etc. 

As you can see the key file is a very important 
part of the operation of the suite, and so one of 
the backup programs is designed to read all of the 
random records in order (from track 1 sector O) 
and reconstruct the key file array relevant to each 
record. Another such program constructs a sim- 
ple array of all record numbers where the data has 
become obsolete. This enables re-use of blocks 
on the disk under program control. | have not used 
the block-allocate and block-free commands as | 
write all the random data to the disk using a 
relative record number — (in other words 
DOS/BAM haven't the foggiest what is on the 
disk but the program does ..... | hope! 


Refinements 

programs are gradually being refined. For in- 
stance, the input program now searches for the 
existence of any vacant blocks via the ‘Vacbloc’ 
array set up by the backup program. This array 
holds the record number of obsolete data blocks. 
Once this array of record numbers has been ‘used 
up’ the numbering of further new records reverts 
to sequential numbering starting from the total 
number of records on disk. The program simply 


UNIVERSITY OF MANCHESTER 


DEPARTMENT OF EXTRA-MURAL 
STUDIES 


RESIDENTIAL MICROCOMPUTER COURSES AT 
THE UNIVERSITY CONFERENCE CENTRE — 
HOLLY ROYDE 


Learn Basic, Practical BASIC Fee: £189 
Monday-Friday, 27 September-1 October, 1982 
BASIC on the ZX81 Fee: £59 
Friday-Sunday, 22-24 October, 1982 

Start Programming with CBM Disk DrivesFee: 
£59 

Friday-Sunday, 29-31 October, 1982 

Machine Code on the ZX81 Fee: £59 
Friday-Sunday, 10-12 December, 1982 

BASIC Programming Fee: £82.50 
Friday-Sunday, 14-16 January, 1983 
Advanced CBM Disks Fee: £59 
Friday-Sunday, 4-6 March, 1983 


The fees quoted include tuition and full board 
accommodation in comfortable single study 
bedrooms. The conference centre is situated in its 
own gardens, approximately 4 miles south of 
Manchester city centre. For a fully detailed leaflet 
please contact Lynn Palethorpe, Department of 
Extra-Mural Studies, The University, Manchester, 
M13 9PL or telephone 061-273 3333 ext. 3076. 
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reads this variable from a counter incremented 
while the key file arrays are being read in using a 
simple loop which checks for the end of file status 
flag. 
. | hope shortly to introduce a system whereby 
up to a screenful of user instructions may be call- 
ed from the disk directly onto the screen and then 
return to the point in the program the user had 
reached, without disturbing the memory, 
variables etc. | feel it ought to be possible and am 
busy scanning the journals and mags! 
Other developments rather than refinements ° 
will enable a wide range of statistical analyses to 
be carried out on the information stored by these 
programs. This would include changes in the 
dwelling stock, growth rates of settlements, pro- 


_ portions of local government to private housing 


.. the list is almost endless (so my section head 
would have me believe!). 


Summary 

Perhaps | have been able to give some idea of a 
layman’s progress with the PET, and made even a 
little encouragement for those who, like me, are 
beginners and often get that “‘bogged down” — 
feeling — just persevere! 


SS 
MIGROS 
Welwyn ceemee rth 


Tel WGC (07073) 31436 
Telex 298641 


AFTER 
SALES 
SERVICE 





Interfacing 





Upgrade Roms for Old 8k Pets 


For those of you with the old 8k PET and 24 pin 
ROMs who envy the three empty sockets in the 
newer machines, good news. 

The ‘upgrade’ ROMs for these machines only 
occupy four of the seven sockets and a simple cut 
and hack operation on your main board will enable 
you to use two of the freed sockets. All three 
sockets may be used by the simple addition of 
one more IC. | 

Furthermore, if you want to only use one 
socket for the toolkit, or the Word Pro 3, you 
don’t even have to pull the board from the case. 

A word of advice, however. If you are not 
reasonably expert in handling this type of opera- 
tion (soldering directly to the IC pins), or live and 
work in a high ‘static electricity’ environment, 
don’t try it. 

This modification required two sequences of 
events: 

1. Change the bank select lines to the emptied 
ROM sockets, and 
2. Change the bank access to the external PET 
data bus. 

Both these operations may be done with the 
main board still in the case if only one socket is to 
be enabled. If you want two sockets operational, 
you have to pull the board to get at a trace on the 
underside. 


Change Bank Select Lines 

The ‘bank’ addresses of the three freed sockets 
has to be changed from C, D, and F, (in hex- 
adecimal notation; 12, 13, and 15, in decimal), to 
9, A, and B, or whatever. The three bank select 
lines of interest originate at IC G2, pin 14 (select 
C or, 12), pin 15 (select D, or 13), and pin 16 
(select F, or 15). They run a short distance 
toward the front of the board on the underside of 
the card, then surface near socket H4. They run 
across upper surface of the board toward the 
power supply for several inches then return to the 
undersid2 of the board to connect to pin 20 of the 
appropriate socket. These three traces are to be 
cut just above H5. Be very sure that the traces are 
completely cut and that you remove all the metal 
scrap that is generated. 

Now carefully solder three wires to IC G2 pin 
10 (select 9), pin 11 (select A, or 10), and pin 13 
(select B, or 11). Run these wires to the solder 
dots on the ROM ends of the traces just cut. Sim- 
ple. But if you try to get the machine to recognize 


ROMs plugged into these sockets, it will insist 
that there is nothing there! 


Data Bus Access 

‘The problem lies in the design of the data bus. 
The PET presumes that all addresses between the 
screen memory. and the four ROMs of the 
operating system are external to the. machine. 
When accessing these addresses, it enables the 
external data bus drivers. These drivers take data 
from the outside world and place it on the internal 
bus. In the meantime the ROM you have just in- 
stalled is trying to do the same thing. That doesn’t 
work well at all. The solution here is quite simple; 
don’t allow the external data bus drivers to be ac- 
tivated when your ROM Socket is_ being 
addressed. 

The IC which controls this action is G4, a 
74LS21. Two of the input lines to this chip are 
not used in the original model and may be ‘stolen’ 
to enable two of the freed sockets. The trace that 
ties the two pins of interest (pins 4 and 5) 
together is on the underside of the board. If only 
one socket is to be used (say for WordPro) you do 
not have to separate them and the board can be 
left in place during the alteration. 

These pins are held at logic ‘1’ (‘high’) by a 
resistor at IC G3. The trace of interest is on the 


‘ upper surface of the board, and goes from the 


resistor to IC G3, pin 9, and IC G4, pin 5. Cut the 


trace near G4, remove the scrap metal, and run a 


wire from G4 pin 5 to the appropriate bank select 
wire installed in part 1, above. To use a second 
socket, you have to remove the main board, cut 
the trace connecting IC G4 pins 4 and 5 together, 
and run a second wire from pin 4 to another bank 
select line. 

The third socket may be used, but you have to 
instal another IC. Drop me a line and I'll send you 
a schematic. My address is Box 481, Rossland 
B.C, VOG: TYO: 

If you are like me ad have the Toolkit hung on 
the side of the PET at the expansion port, you can 
even have two ROMs with the same address, 
selectable with an external switch. The bank 
select signal goes to the switch and is routed to 
the appropriate ROM. The unselected ROM must 
have the bank select line pulled high with a 1k 
resistor to the + 5 volt power supply line. The cir- 
cuit is left as an exercise, but don’t forget to 
switch the external data bus drivers at the same 
time. 
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Sound ‘n’ Vision— 


Real Sound in Real Time 


If you ever wanted to synthesize instruments in 
real time on your PET/CBM, then this article will 
tell you of one marvelous, unadvertised, un- 
promoted program. It is Instrument Synthesis 
Software Package (K-1001-6C) from Micro 
Technology Unlimited. The cost of the program is 
$50. The required digital-to-analog converter 
(DAC) is $60. 

Hal Chamberlin who is considered the father of 
real-time microcomputer music, has written 
several eloquent papers on the principles behind 
the system (see references). He invented an in- 
genious software method of producing multi- 
voice sound on the PET and has recently 
elaborated that invention to include instrument 
building. 

Hence, with minimal cost, a PET user can have 
an in-house synthesizer comparable in quality to 
some expensive hardware systhesisers. | recently 
attended a concert in Philadelphia at which Frank 
Covitz and Cliff Ashcraft, known in the trade as 
the Diatonic Duo, demonstrated the MTU’s 
system with help of PET’s distinguished 6502 
ancestors: the Baroque Aim and the Home-brew 
Kim. The excellent sounds included a super 17th 
century harpsichord and a $2 ukelele pitch pipe. 


Tiny Bit of History 

Originally, the Chamberlin-style four-voice music 
software produced organ-like sound of varied 
characteristics, achieved through user’s complete 
control of overtones. The sound: had a sudden 
onset, level sustain and a sudden drop. There ex- 
ist two such systems: AB Computers’ Visible 
Music Monitor, written by Frank Levinson and 
known for its superb graphic editor, and MTU’s 
four-voice package written by Frank Covitz, 
known for its lack of an editor. Both systems are 
currently available. 


The State of the Art 

Hal Chamberlin elaborated on the idea of his 
original system by adding an instrument synthesis 
feature. It is now possible to synthesize just about 
any sound, real-or imagined. Fairly successful im- 
itation of existing instruments has been done. In- 
vention of new instruments via sound analysis 


permits us to hear, for example, Bach’s inven- — 


tions played by a word ‘‘NO”’ or ‘‘Raindrops Keep 
Falling on my Head”’, played, quite appropriately, 
by a straw and, | think, water dripping into a 
glass. 
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The program permits the user to select from the 
book and/or create ‘‘instruments’’ by specifying 
the amplitude and its rate of change over time for 
each harmonic. This sounds hard, but isn’t. Enter- 
ing X-Y (time-amplitude) coordinates does the 
trick, the program does the rest. The so defined 
composite amplitude envelope accomplishes the 
distinctions between various instruments: pluck- 
ed, struck and blown instruments have been suc- 
cessfully implemented. The necessity for very 
high overtones does not yet permit building bow- 
ed instruments. There is no limit to the variety of 
sounds you can make (within the 8100 cps 
sampling rate), including different touch or attack 
characteristics, as well as crazy combinations of 
sound effects. 

In fact, one of the features of this software | 
treasure most is that to the extent of available 
memory and speed of processing, it is infinitely 
flexible. Many sounds can be made, and any note- 
timing protocol can be set, not limiting you to a 
strict observance of the score. Knowledge of 
sound theory is not needed. The book gives 
enough information. 

MTU has a demonstration audio tape available 
for $5. You may hear the sounds before deciding 
to plunge into the synthesis. For those who 
alreayd have the program, MTU sells a floppy or 
two with precoded song data. The program and 
song data are loaded into the PET and, simply, 
RUN. 

The explanation of the physics behind the 
system and the instructions on how to use the 
software are provided. | found only one, insignifi- 
cant, error in the book. The instructions are com- 
plete, but difficult to use at first. The reason is 
that it is not immediately apparent from reading 
the descriptions of the available commands what 
is the commands’ purpose. Their utility becomes 
obvious when one studies the book and a coded 
song together. The syntax of commands is unam- 


-biguous and yields an error message or silly soun- 


ding music if not observed. Locating an error is 
easy if the program’s extensions are used. 


How Does it Sound? 

| like the sound. People who are familiar with the 
earlier, organ-like, music may be interested to 
know that through several ingenious programm- 
ing tricks, Frank Covitz has improved the sound 
quality of the system, even though this program 
has to perform many more calculations in real 


time than it did previously. There are no “‘‘clicks’’ 
between the notes and the signal-to-noise ratio 
has been increased by an audible 6db. 

Chamberlin and Covitz remind the readers that 
the sounds are ‘‘guitar-like’’, ‘‘horn-like’’ etc. and 
not quite ‘‘the real thing.’’ What's missing is the 
‘‘liveliness’’ and the resonances of the instrument 
when limitations are built (though piano in the 
lower range is superb, since it uses 26 har- 
monics!). The reason is that the 8kc rate is too 
slow to permit high harmonics without running in- 
to distortion problems at high pitch. Hence, it is 
not appropriate to compare it with the real thing. 
But these tones are nevertheless pleasing and the 
key characteristics of the imitated instruments 
are clearly present. Invented instruments, of 
course, are not subject to such comparison, and, 
therefore sound just terrific. One of my favourites 
is a wind instrument that gently whistles while it 
plays, the whistle coming in a bit after the highest 
amplitude of the rest of the sound. 

Musically, many of the instruments in the book 
and in the already transcribed songs, are 
beautiful. Their interesting characteristics and 
their variety compensate for the ‘’smallness’’ of 
PET’s sound. Many instruments chosen for a par- 
ticular piece of music sound appropriate to the 
coded music, even if that piece of music was 
written for another instrument. It takes some do- 
ing to orchestrate things. | like the results produc- 
ed by Covitz, Ashcraft and Chamberlin. 


Educational Possibilities? 

Listening to transcribed music, in many _ in- 
stances, makes the music more accessible to the 
listener.. The impact is similar to, -for instance, 
Segovia transcriptions of Bach’s keyboard or 
violin works for the guitar or the Canadian Brass 
Quintet’s transcriptions of all sorts of music for 
trumpets and things. 

The system has a great entertainment value 
built in. It may also have an educational value. 
You can study various aspects of music and the 
physics of sound without fancy sound analyzing 
gizmos, and without a multitude of instruments at 
hand. Your ears and the graphing paper tell you 
just about the whole story. 

It is interesting to hear music performed at dif- 
ferent speeds, without changing pitch. It’s also 
interesting to study what happens if a line of 
music is played backwards or by a variety of dif- 
ferent instruments. It points out the tie between 
an instrument, melody, mood, etc. It can be used 
to study how instruments fit the music. It shows 
that to be able to utilize the multitude of possible 
sound configurations, new music may need to be 
written. These are some of the things that cannot 
possible be observed with just a record player or a 


tape recorder. 

A curious result of coding your own music is a 
realization of a fact, well known to musicians, 
that the musical score is only a hint and that it is 
totally inadequate as a means of communicating 
the’ composer’s wishes (whatever they may have 
been). Pages of notes are a necessary require- 
ment for music, but by no means sufficient. It 
takes some doing to tell the PET to not perform 
like a machine but it can be done since the pro- 
gram places almost.no limitations on the user. 
Your coded music will not sound big and power- 
ful, but it can have a character of its own. Therein 
lies the fun of putting music on the PET. 


How Easy to Code? __ 

It could be worse if the book.was ambiguous, 
which it isn’t. But once you read the book, accept 
the syntax rules and code one or two measures of 
a song. It’s not hard at all. Just tedious. 

MTU considers this product an unfinished 
work. It is not promoted and as far as | can tell it 
will not be promoted until the ‘“human interface’’, 
or a note and instrument entering editor is writ- 
ten. Writing such an editor is a great challenge, 
where half-way measures won’t do. | can’t tell 
when the editor will be available for. the PET. 
Hence, we are stuck with coding instruments and 
music via the Machine Language Monitor. No 
machine code knowledge is required to use the 
system as it is an interpreter specifically designed 
for doing music. For instance, two of some 16 
commands look like. this: ‘F2 tt’ means tempo, 
‘FE pp bb’ means play a segment that is in 
memory at location pp bb. Knowing how to use 
PET’s Monitor and a sense of pages in its memory 
is needed, but one can learn by doing. 

You have two options. One is to use the pro- 
gram and the song data for enjoying it and wait 
with coding your own things until the editor is 
written. The second option is to jump in now and 
not miss all the fun. The system, even though 
tedious in places, is useable, error-free and invites 
experimentation. Debugging extensions to the 
program have been provided which help locate a 
note, or asong segment for easy finding of coding 
errors. 

In case you might be worried that your song 
data may become obsolete should an editor be in- 
troduced, I’d say ‘‘don’t worry’’. One of the key 
policies of MTU has been compatibility. It is 
unlikely they will obsolete anything. Just as, at 
the present time, a song coded on an APPLE, for 
instance, will play, with no modifications on any 
one of PET’s many releases and 6502 relatives, | 
am pretty sure the introduction of an editor will 
not change a thing. 
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Sound ‘n’ Vision 


System Considerations 
MTU strongly recommends a 32K PET. Only 


several available songs will play in a 16K PET... 


Neither the program (2.5K) nor the song data 
(varies. }K-2K is a good guess) use much 
memory. The waveforms for the instruments, 
however, gobble it up pretty fast. A disk drive is 
not essential, though always very. helpful. 
Monitor extensions, such as the Supermon or Ex- 
tramon are essential. They permit easier editing of 
data, specifically, inserting, deleting and transfer- 
ring code. You can’t do without them. Both are 
public domain programs, available from various 
sources. The MTUs’ Visible Memory board can, 
optionally, be used to see the elements of an in- 
strument. A _ digital-to-analog converter board 
needs to be plugged into the User port of the PET. 
Two DACs can be used for stereo effect (2 voices 
to each channel). In a concert hall the stereo ef- 
fect was incredible, but in a home situation it’s 
not needed (I’m biased: | think monaural records 
are OK). 


Other Information 

Making this kind of music on your microcom- 
puter is a lot of fun now and the results can be 
quite musical, even though the sound quality is 
that of a slightly noisy AM radio if only quiet in- 
struments are picked. Do not let this discourage 
you. We can reasonably expect true high fidelity 
sound in a short time. All it will take is a faster 
processor and larger memories. It’s worth taking 
the plunge now and be ready for progress. 


REFERENCES 
(1) Hal Chamberlin, A Sampling of Techniques for 
Computer Performance in Music, BYT 


E magazine, September 1977. 

(2) Hal Chamberlin, Advanced Real Time Music 
Synthesis Techniques, BYTE magazine, April 
1980. 

(3) Hal Chamberlin, Musical Applications of 
Microprocessors (a big book, 653 pages), $25. 


Getting Usable Video Signals from 12’’ Monitor 
PET/CBMs 


This program works with any ‘‘fat’’ Commodore 
computer (8032, 12’ 4032, 8096, and 
SuperPET). It re-configures the video controller to 
produce signals which more closely approximate 
the standard video sync signal frequencies. For 
those wishing to use an external video adapter to 
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display the PET screen on a video monitor, this 
program can save having to. modify the monitor. 

The PET screen remains completely readable, 
with only minor narrowing of the. picture and the 
possibility of loosing part of the bottom line in text 
mode. However, this can be corrected with a 
slight adjustment* to the PET video section. 

Video adapters formerly used with 9’’ screen - 
machines will not work directly with the new 12” 
machines as the polarity of the video out and 
horizontal sync signals have been reversed at the 
User Port. Correct this with: 

PORE’ 59520," FZ PONE 59524; "'0 
This will give the desired effect on the external 
monitor but the PET screen will be inverted (but 
still readable). To get back to normal, POKE 
Sede, 12°) POKE 59521, 16 

Some video interfaces for 9’’ machines have a 
horizontal sync position control and thus may ac- 
cept the inverted pulses. People have used this 
system and it saved them having to obtain new 
interfaces. , 

Video adapters for 12’’ screen machines are 
now becoming more readily available and may be 
used with this program to produce an external 
picture which might otherwise be unable to 
““sync”’ to the strange signal frequencies coming 
from a 12’’ machine without this program. 


TOO DATA 0; 59, 2,47, 4, 26, 5, 8, 7, 25,.9, 
9 

110 DATA O, 59, 2, 47, 4, 33, 5, 6, 7, 30, 9, 
Y 

120 FOR J=1TO6: READA, B 

130 POKE 59520, A 

140 POKE 59521, B 

150 NEXT J 

160 POKE 59468, 14 : PRINT CHR$(14) 

170 PRINT “’HIT ‘STOP’ FOR TEXT MODE 


-CONFIGURATION’’ 


180 GET A$ : IF A$="" "’ THEN 90 

190 FOR J=1 TO6: READA,B 

200 POKE 59520, A 

210 PURE 59521, 8 

220 NEXT J 

230 POKE 59468, 12 : PRINT CHR$(142) 
240 PRINT ‘HIT ‘STOP’ FOR GRAPHICS MODE 
CONFIGURATION”’ 

250 GET A$ : IF A$=" "’ THEN 250 

260 RESTORE : GOTO 120 


*Refer to qualified service personnel 
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Some Useful Hints on Dates 


Have you ever wondered how nice it would be if 
the computer could tell you the date of the day 21 
days from a given date? Whether you have or not, 
read on as there are several things that a com- 
puter can do with dates: not just store them! 

Dates are one of the most awkward items to 
handle in computing, especially in languages like 
Basic, Comal, Pascal etc, which do not have user 
definable operators. For a start, there are several 
formats. For instance, Christmas 1982 could be 
written as 


25 DEC 82 
DEC 25, 1982 
12/25/82 
25/12/82 


For the purposes of ease of writing, the last for- 
mat will be used. There are several things that can 
be done with dates. 

The ones covered here are 


— Sorting in chronological order 

— Conversion of a date to a number 
— Conversion of a number to a date 
— Input of a date 

— Computing the day of the week 
— Computing future or past dates 


Sorting dates 

The simplest manipulative operation on dates is 
a chronological sort. Dates can be easily sorted by 
reversing the positions of the day, month and 


year. This is given in ‘‘sort’ dates’’ (lines 2000 to- 


2460). 


Converting a date to a number 

For most other operations on dates, two func- 
tions are required: one to convert a date to a 
number and another to convert that number back 
to a date. There are several formulae for doing the 
former but not all of them are reversible. The one 
given below is from the HP 25C Applications Pro- 
grams Manual and is reversible. The algorithm is 
valid from March 1, 1900 to February 28, 2100 
but the procedure given below is only valid from 
March 1, 1900 to December 31, 1999. This is 
given in ‘‘days’ val’’ (lines 8000 to 8150). 


Converting a number to a date 
This procedure is semi-iterative (two iterations 
at most) to counter the truncation effects of the 


INT function. This is given in ‘‘date’’ (lines 9000 
to 9300). 


Input of a date 

Date input can cause problems: especially with in- 
valid dates. The. problems like checking the 
number of days in each month or whether the 
date is that of a leap year are quite common. With 
the routines DATE and DAYS’VAL, the checking 
process can be simplified. This is given in ‘‘in- 
put’date”’ (lines 100 to 240). 


Computing the day of the week 

This is a very common use of dates in the com- 
mercial world simply because most people do not 
work on certain days of the week. The day of the 
week can be computed by taking the remainder of 
the result of VAL after dividing it by 7. O means 
Sunday, 1 Monday .. 6 Saturday. This is given in 
‘weekday’ (lines 1000 to 1040). 


Computing past or future dates 

Say you wish to tell a customer to come back in 
21 days and it is 17/12/81 today and you do not 
have a calendar and he wants to know the actual 
date. No problem: just convert the date to a 
number, add 21 and convert the result back to a 
date. This is given in ‘compute’ (lines 4000 to 
4160). 


And to end ... 


| hope the above routines which have been 
written in Comal (but can easily be translated into 
any other language) will open up new areas in pro- 
gramming for readers. 


-To end, here is a program to print a calendar. It 
is a Basic 2 program which was written on a 32K 
PET but might just fit on to a 16K PET. The date 
routine (41000) used here is the one given in A.J. 
Newey’s ‘‘One Hundred Computer Programming 
Problems’’ (Pitman Press, 1973, ISBN O 273 
003080 9). The double SGN function is 
something left over from my Algol 60 days: it 
was faster and generated less code than an IF 
statement. On line 30050, if 29/02 is the same 
day of the week as 01/03 then it is not a leap 
year. It was written in a Fortran type style with all 
the ‘declarations’ on the top and subroutines at 
the bottom. This is not the most efficient format 
for programs on the PET but | aie not know any 
better in those days. i 
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Listina of prosram i. 


0100 
0170 
0140 
0160 
0180 
0190 
0200 
0210 
0220 
0240 


1000 
1020 
1040 


2000 
2010 
2020 
2040 
2060 
2080 
2100 
2120 
2140 
“2160 
2180 
2200. 
2220 
2240 
2260 
2280 
2300 
2320 
2340 
2360 
2380 
2400 
2420 
2440 
2460 


4000 
4020 
4040 
4060 
4080 
4100 
4120 
4140 
4160 


8000 
8010 
8020 
8030 
8040 
8050 
8060 
8070 


8080" 


8090 


8100 


8110 
$120 
8130 
8140 
8150 


#000 
9010 
9020 
9030 
9040 
9050 
9060 
9070 
- 9080 
9090 
9100 
9110 
9120 
9130 
9140 
~ 9150 
9160 
9170 
9180 
9190 
9200 
9210 
9220 
9230 
9240 
9250 
9260 
9270 
9280 
9290 
9300 
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proc ineut’date(ref dmy$) closed 
dim temp$ of 8 
repeat. 
input dmy$ // Get the date 
days:=days’ val (dmy$) 
// Compute what it should be 
exec date (days: teme$) 
// Terminate when it is the same 
until dmus=temes 
enderoc input’date 


Proc weckday(dmy$) closed 
weekday: =days’ val(dmy$) mod 7 
endrroc weekday 


proc sort(ref dt$()snum'’dates) closed 
dim teme$ of 3 
// Reverse dates 
for i:=1 to num’dates do 
At$(id=dtSCiv7:2)+dt$Cis4s Z)+dt$(ivi:2) 
next i 
// Selection sort 
for is=1 to num’dates-1 do 
mins=i 
for J:=i+1 to num'dates co 
if dt$(min)>dt$(5) then minz=3 
next J 
if i<>min then 
// Exchange 
temp$:=dt$(idi 
dt$(min)d:=dt$ (id 
dt$(idr=temrs 
endif 
next i 
// Put dates back in original form 
for i:=1 to num'’dates do 
dt$Cids=dtSCisS:2)+"/" 
AtSCids+dt$CisSr24+"/"+dt$CisisZ) 
next i 
endproc sort 


// compute future dates 
proc compute closed 
dim today$ of 8) ready$ of 3 
print "Today's date:"» 
exec input’ date (todays) 
input “Number .of days:": wait’ time 


exec date(days’ val (today$)+wait’ times ready$) 


Print “Come back on “»ready$ 


anderoc compute 


// convert a date to a number of days 
proc days’ val(date$) closed . 
Found: =1/256 
// numval converts a string to a number 
day: =numval (date$(1:2)) 
month: =numval (date$(4:2)) 
year: =numval (date$(7:2) )+1900 
if month>2 then 

month: +1 
else 

month:+13 

year:-1 
endif 
days’ vals=daytint (month#30. 6+tround) 
days’ val:+int (year#3é5, 25+round) 
endproc days’ val 


// convert a number of days to a date 
proc date(dayssref res$) closed 
round: =1/256 
year: =int (days/365, 25+round) 
// evaluate the month 
repeat i 
year2:=int (year#365. 25+round> 
month: =int ( (days- year2) /30. 6+round) 
if month<4 then year:-1 
until month>=4 
// evaluate the day 
repeat 
day: =days- int (month#*30, 6+round)-year2 
if day=0 then month:-1 
until dayw>o 
// convert to a strings 
res$:="" 
if month>13 then 
year:+1 
month:-13 
else 
month:-1 
endif 
// the routine str does the followings: 
// nes$=res$trisht$(str$(x+100)52) 
exec str(day res$)2) 
date$: =date$+"/" 
exec str(monthsres$s2) 
date$:=dates+"/" 
exec str(year- 1900) res$s 2) 
enderoc date 
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10000 
10020 
10030 
10053 
10055 
10056 
10057 
10058 


10060 
10062 
10063 
10064 
109065 
10066 
10068 
10070 
~ 40072 
10074 


10100 
10101 


10102 
10103 


10104 
10108 


10112° 


10113, 


10114 


10116 
10117 
10119 
10120 
10122 


10123 
10125 


10200 
10212 
10213 
-10214 
10216 
10220 
10223 


10500 
10505 


10510 
10520 
10530 
10540 


10550 


10560 


10570 


10580 


10590 
10600 
10605 
10610 
10620 
10630 
10640 
10650 


10660 





REM==(TALENDAR ¢S 

REM WRITTEN: 16/03/80; CUP 

REM UPDATED: 08/06/82) CLIP 

REN Har sesetetrede sth ses see seers 

REM THE AUTHOR IS NOT RESPONSIGLE 

REM FOR ANY INCORRECT CALENDARS 

REM GENERATED BY THIS FROGRAM, 

REP St dnet hea 4a at ree rene a 

REM==F PROGRAM ALTERATIONS 


REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 


10123&%15730: 
10114815730: 


WIDE PRINT (W$> 
NORMAL PRINT (N$) 
11000-11999: INTRODUCTION 
10119920700: TRAILER 

106301 10690) 36010: 
50000-52500: 
54000 t 
55000-55110: 
56000-56150: 


LARGE CHARACTERS 
MNEMONICS FOR DAYS 
SPEILLING OF MONTHS 
MICRO OTHER THAN 6502 


REM==VARIABLES 





Ag=""5 
A=ASC ("a") 
BS="_"s 
B=144 

C=0: 
Cg=o"": 
co=0 


REM--SET UP FOR BDSOF 
N=0: 

NC=0: 

ND=0: 

N$=CHRS$ (27)+CHR$(14): 
P=0 

QS=CHRS (34) 
S$="cup/pet 

TY=0 

V$=CHRS$(124) 


REM--SET UP FOR BDSOP 
W=0: . 
WS$=CHR$(27)+CHRS$(15): 
Y=0; 

YOo=0 


REM==ARRAYS 

DIM LT$(25) 

DIM MD(456)9MN®(12)»MN(12) 
DIM NM$(9) : 

DIM P$(65) 

DIM T(13) 

DIM WKCé) 


REM==MAIN PROGRAM 


REM-- INTRODUCTION 
GOSUB 11000: 


REM-- INITIALIZE 

GOSUB 20000: 

INPUT “clear. screenderint symbol"; A$: 
IF LEN(A$)=1 THEN 10550 

PRINT “<Scursor. down? rvs. ondmmm... "Ft 
GOSUB 38000 

PRINT “i can't decide which one to use": 
GOSUB 38000: 

GOTO 10520 


REM--TEXT ETC 
GNSUB 42000: 
GOSUB 15000: 
PRINT “<clear. screen} year - 
LO=1900: : 
HI=99993 
GOSUB 40000: 
Y=N 
PRINT 
LO=1: 
HI=12: 
GOSUB 40000; 
Mi=N 
PRINT 
LO=Nz 
HI=12: 
GOSUB 40000: 
M2=N : 
INPUT “ordinary cal 
TY=- (AS="4") 
INPUT “diary tyre 
TY=TY~ CAS="4" HZ 
INPUT “number of cals"#NC: 
IF NC<1 THEN 10605 
IF TY=0 THEN 10590 
FOR C=1 TO NC 

OPEN 22254: 

-GOSUB 16000 

FOR M=M1 TO M2 


“starting mont 


“endings month 


"FAS: 
"FAG: 


REM--FORM THE MONTH 
GOSUB 30000: 
IF TY AND 1 THEN 





LINE VERSION? 


DIFFERENT PRINT INSTRUCTIONS 


10670 


10680 
10690 
10700 
10710 


11000 
11003 


11005 
11006 
11007 
11003 
11009 
11010 
11020 
11030 
11040 
11050 
11055 
11060 
11070 
11080 
11090 
11095 
11100 
11105 
11110 
11120 
11130 
11140 
11150 
11160 
11170 
11175 
11180 
11190 
11200 
11210 
11220 
11230 
11240 
11250 
11260 
11270 
11280 
11290 
11300 
11310 
11320 
11330 
11340 
11360 
11370 
11380 
11390 


11400 
11410 
11420 
11430 
11999 


15000 
15020 


15020 
15040 
15100 
15110 
15200 
15210 


SRE 0 faa oa aaa 


15220 


15230 


15240 
15250 


15260 
15270 
15280 


15500 
15510 
15520 
15530 
15540 


15550 
15552 
15554 


15556 


GOSUB 35000 
IF TY AND 2 THEN 
GOSUB 34000 
NEXT M 
CLOSE 222 
NEXT C 
GOTO 10520 


REM== INTRODUCTION 
PRINT “{cléar. screen} (@cursor. down? 


PRINT " the author is not responsible 
PRINT " for any incorrect calendars 
PRINT " generated by this Program. 
eR ana gece veo mm tm emigre 


GOSUB 37000 

PRINT “fclear. screen}this program will senerate a calendar 
PRINT “on the printer for any year between 

PRINT "1900 and 9999 Cif the system doesn’t 

PRINT “change by then). each month will be 


PRINT “printed on a pase of 80 columns by 


PRINT "66 lines. 

PRINT “cursor. down}the computer will first ask you for 
PRINT “’print symbol’. this is the symbol 

PRINT “with which the ‘large’ characters will 

PRINT “be printed. <return> terminates the 

PRINT “Program. 

PRINT “cursor. downdit will then print ‘text’: this allows 
PRINT “the entry of text before the calendar. 

PRINT “each line must besin with one of the 

PRINT “followings codes: 


PRINT “cursor. down? b blank line 


PRINT “ e end of text 
PRINT “ 1 large characters 
PRINT “ n normal characters 
PRINT." w wide characters 


GONSUB 37000 

PRINT “cursor. downdup to 66 lines of text are allowed. 

PRINT “this deeends on the option chosen (1 

PRINT "takes S lines). the. maximum lensth of 

PRINT “aach line also depends on the option 

PRINT “chosen (1-135 n-72s w-40). you have 

PRINT “the choice of either centralizing the 

PRINT “outeut or havins it ‘as is’. 

PRINT “cursor, down} the comeuter will then ask you for the 

PRINT "year. this should be given as a four 

PRINT “clisit number betwean 1900 and 9999, 

PRINT “cursor. downdthis is followed by a request for the 

PRINT “months for which the calendar is 

PRINT “resuired. the input should be given 

PRINT “numerically: t=Jan» 2=febs .. 12=dec. 

GNSUR 37000 

PRINT “sou will then have the choice of an 

PRINT “ordinary calendars a diary tyre or both 

PRINT "“cursor., down} finally» you are warned that continuous 

PRINT “printins of wide characters may 

PRINT “overheat your printer. 

PRINT “{2cursor. downde.s. the only characters allowed in 
the : 

PRINT "“’larse’ option are alephanumerics and 

PRINT “spaces. blanks will be substitued for 

PRINT “‘unknown’ characters. 

GOSUB 37000 

RETURN 


REM==23BTAIN THE FRONT FAGE 

PRINT “cursor. home} (3cursor. down? {rvs. on} text frvs. of F3"s 

INPUT “cursor. home? {Scursor. downdsame as Previous 
pase" AS: 

AS=LEFTS (AS) 1) 

IF AS="u" THEN 
RETURN 

IF AS<>"n" THEN 15020 

INPUT “fcursor. home? <7cursor. downd should the text be 
centralized"+C$: 

C$=lEFTS$(C$s 1) ; 

IF CS<>“y" AND C$<>"n"" THEN 
GOTO 15100 

PRINT “lines{cursor. down? (Scursor. lefti left": 

LO=66 

LC=LC-1¢ 

IF LC<O THEN 





RETURN 
PRINT LC; TAB(C4)# "{Scursor. right? "@$0$" cursor. left? 
fScursor. leftr "Fs 
INPUT L$: 
AS=LEFTS(LSs 1) 
IF A$=“b" THEN 
PSC(LOQ=S""s 
_ GOTO 15210 
IF As="e" THEN 
RETURN 
LS=MID$(L$s 2): 
LNSLEN(L$): 
IF AS="1" THEN 15500 
IF At="n" THEN 15600 
IF A$="w" THEN 15700 
PRINT “{rvs. ondunknown character codeirvs. of f}": 
GOTO 15220 t 


REM--LARGE CHARACTERS 
IF LND13 THEN 15810 
IF LC<4 THEN 15820 
FOR P=1 TO 21 STEP 5 
AS="": 
IF C$="y" THEN 
AS=LEFTS$ (BS: 40-LN*3) 
FOR N=1 TO LN § 
MS=MINS(LS»Ny 1) 
IF M$>="0" AND M$<="9" THEN 
AS=AS+MIDS (NMS (VAL (M$) YPYS)+" “2 
GOTO 15560 : 
IF M$>="a" AND M$<="z" THEN 
AS=AS+MIDS(LTSCASC(MS)-ADsPs S04" “se 


15558 
15559 


15560 
15570 


15580 
15590 
15600 


15610 
154620 


15630 


15700 
15710 
15720 


15730 
15800 
15810 


15820 


16000 
16020 


16100 


16110 


16120 


16999 
20000 


20100 
20110 


20200 
20210 


20300 
20310 


20400 
20410 


20500 
20510 


20600 
20610 


20620 
20630 
20660 


20700 
20710 


20999, 


30000 


30010 
30020 
30030 


30040 
30050 


GOTO 15560 


IF M$<>" " THEN 
PRINT "{rvs. ondunknowun char: "+M$"irvs. of f}' 
AS=AS+LEFTS(BSs 6) 
NEXT N 
PS(L.O)=AS: 
IF P<>21 THEN 
LO=LC-1 
NEXT. P 
GOTO 15210 
REM--NORMAL CHARACTERS 


IF LN>80 THEN 15810 

Ag=""s 

IF C$="y" THEN 
AS=LEFT$ (B$1 INT ((80-LN)/2)) 

PS(LO)=AS+LS$: 

GOTO 15210 


REM--WIDE CHARACTERS 

IF LN>40 THEN 15810 

ag=""; 

IF C$="y" THEN 
AS=LEFT$ (BS; 40-L.N) 

PS(LC)=AS+WS+LS4NS: 

60TO 15210 


REM--ERROR MESSAGES 
PRINT “irvs.on}strins too lonsirvs. of fF)": 
GOTO 15220 
PRINT “irvs.on}no more space on rpasgetrvs. off)": 
GOTO 15220 
REM==FPRINT FRONT FAGE 
IF LCO=65 THEN 

RETURN 
LeINT(LO/2)3 
IF LO<>0 THEN 

Lg="": 

FOR [=1 TO Ls: 

GOSUE 36000: 

NEXT I 
FOR I=65 TO LC STEP -1: 

=L+1s 

L$=P$(1): 

GOSUB 36000: 
NEXT I 


. REM--FORM FEED 


IF L<>66 THEN 
Le=""5 
FOR I=L TO 66: 
GOSUB 36000: 
NEXT Is 
RETURN 


REM==INITIALIZE 


REM--NUMBERS 
FOR N=0 TO 9: 

READ NM$(N): 

NM$ (ND =NMS(ND+"" 
NEXT N 


REM--LETTERS 
FOR N=O TO 25: 
READ LTS(N): 
LTS(NI=LTSC(ND +" "5 
NEXT N 


REM--WEEKDAYS 
FOR W=0 TO 4: 

READ L$: 

WK (CW) =ASC(L$)-As 
NEXT W 


REM--B$=128 BLANKS 

FOR N=1 TO 6: 
BS=PS+BS: 

NEXT N 


REM--MONTHS 
FOR N=i TO 12: 

READ MN(N)+MNS(N) = 
NEXT 'N 


REM--GHARACTER CONVERSION ROUTINE 
REM CHECKSUM 
cs=0: 
FOR N=8Z6 TO 1024: 
READ CO: 
OS=CS+001 
IF CO>O THEN 
POKE N+CO: 
NEXT N 
IF CS<>0 THEN 
PRINT “Crvs.on3Error in Assembler prosramirvs. of fF)": 
LIST 56000-56180 


REM--IRQ 
IF PEEK (40)+PEEK(41)#256<>1025 THEN 
B=537: 


REM--PUT TRAILER IN BOTTOM RIGHT CORNER 
S$=RIGHT$(BS+S$,S0) - 
RETURN 


REM==FOoRM THE MONTH 
REM--DETERMINE THE NUMBER OF DAYS 
ND=MN CM) 

IF M<>2 THEN 30100 

REM--SPECIAL CASE FOR FEBRUARY 


D=1s 
M=3: 


Commodore Computing 3 5 
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30100 
30110 





30220 
30240 


30290 
30300 


31000 


31010 
31020 


31030 


31100 
31110 
31120 


31200 
31220 
31240 


31310 





32020 


32030 
32999 


34000 
34010 








34430 


34140 
34150 
34160 


34170 
34150 
34190 


35000 
35010 


35400 
35410 
35420 


35430 


36 





GOSUB 41000: 
N=DY: 





REM--CLEAR MONTH 
FOR W=0 TO 4: 
FOR DY=0 TO 6+ 
MD CW» DY) =O: 
NEXT DY: 
NEXT W 


REM--FILL IN THE MONTH 
D=13 

GOSUB 41000: 

W=0 

FoR D=1 TO ND 

MDCWs DY)=D: 

DY=DY+1: 

IF DY 
DY=0: 
W=W+t: 

IF ‘W=5 THEN 
W=0 





THEN 


NEXT D 
RETURN 


REM==OUITRUT THE MONTH HEADER 


REM--FILL IN THE TITLE (MONTH) 
MS=MNS CM) ¢ 
L=LEN(M$) 
FOR N=i TO Li: 

TON) =ASC (MIDS (MSs No 1))-Az 
NEXT N 


REM--FILL IN THE YEAR 

YoOry 

FOR N=13 TO 10 STEP 
YO=INT (YO) /10: 
TCND=INT ¢ CYO- INT CYO) #1040, 5)s 

NEXT N 


=e Y | 


REM--OUTPUT THE MONTH AND YEAR 
FOR P=i TO 21 STEP 5 
Lo="": 
FOR N=1 TO Ls 
LO=LS+MIDSCLTS(TOND 2sP2S)+" "3 
NEXT N 
L$=LEFTS$(L$+EBS)546)3 
FOR N=i0 TO 13: 
LSHLS+" “FM IDSCNMSCTOCN) 9 Po SDs 
NEXT N 
5OSUB 36000 





NEXT F 





36000 


RETURN 


REM==DIARY SEFARATOR 
L$=LEFT$ (BS) 7)+"+" 
FOR W=0 TO 4: 
LO=L$+"-------------~ +" 
NEXT W 
GOSUB 36000 
RETURN 





"26000: 
SUB 32000 
FoR DY=0 TO:6 
FOR P=-4 TO 26 STES 5 


REM--OBTAIN THE DAY OF THE WEEK 
IF F=-4 OR P=26 THEN 
LS=LEFTS(ESs 73+V$: 
6OTO 34140 
LS=MIDS(LTSCWK(DY) )oPrS)+" "+E 
REM---DATES WHICH FALL ON THAT DAY 
FOR To 4 
TF P=-4 AND MDOCWs DY) <>0 THEN 
LS=L$+RIGHTS (BS+STRS (MD CW DY) 9 13)04+V$2 
GOTO 34180 
L$=L.$+RIGHTS (BS) 13)+V$ 
NEXT W 
G0SUB 
NEXT P 
GOSUB SZ000 
NEXT DY 





34000 


REM-- TRAILER 
L$=S$s 
GOSUE 36000; 
Lee": 
GOSUB 36000: 
RETURN: 


REM==NORMAL. 
GOSUB 31000: 
Lg=""; 
GOSUB 
GOSUE 
GNSUB 


CALENDAR 


36000: 
36000: 
36000 


REM--OUTPUT THE DAYS OF THE MONTH 
FOR DY=0 TO 6 
FOR P=1 TO 21 STEP 5 


REM--OBTAIN THE DAY OF THE WEEK 
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35440 
35450 
35460 
35470 


35480 


35490 


35500 


35510 
35520 
35530 
35540 


35550 





37020 


37030 
37040 


37050" 


37060 
37999 


38000 
38010 


38020 


40000 


40010 . 


40020 


40030 


40999 
41000 


41010 
41020 
41030 
41040 
41050 
41060 


41065 
41070 
41080 
41085 
41090 
41100 
42000 
42010 
42020 
42030 
42040 


42100 


42110 


42120 


42999 


50000 
50001 


LS=MIDS CTS CWE CDY) 9 Ps 5) 


REM--DATES WHICH FALL. 
FOR W=0 TO 4 
DMD CWs DY): 


ON THAT DAY 


L$-Le+" 
IF D<10 THEN 
- LgsLge" ms 


GOTO 35500 
LS=L$+MIDSCNMSCINT(D/10)}»FPySo+" © 
IF D=0 THEN 
L$=L$+" nF 
GNTO 35520 
LS=LS+MINS CNMS CN- INT (D/10)#10)9P 95) 
NEXT W fe 
GOSUB 36000 
NEXT F 


REM--TRAILER 
Lgetns 
GOSUB 36000: 
GOSUB 36000: 
IF DY=é THEN 
L$=5$;: 
GOSUE 36000 
NEXT BY : 
Lge" "; 
GOSUB 36000: 
RETURN 


REM==FRINT A LINE 
PRINT £2225L% 
RETURN , 


REM==>WATT 


REM--IN CASE SOME IDIOT DECIDES TO USE RUN/STOP 
P=PEEK(B)s 
POKE By P+3: 
PRINT “cursor. 

strike any key to continuetrvs, of fF} {2cursor, uP? 
GET AS: 
IF Ag="" 
POKE P 
IF (ASC CAS) AND 127)9=3 THEN 

PRINT “{Scursor. dowun?trust you to do 

that! ¢Scursor. down": F 

STOP 

PRINT "“Sclear. screen" 


THEN 37030 








RETURN 


WA IT FoR A WHILE 





JF Ag=""" THEN 
NEXT F 
RETURN 


REMS=—= INPUT ROT INeE 
INPUT N 
TF N<LO OR N>HT THEN 
PRINT “trvs. ontshould be between"LO;" 
G60TO 40000 
IF N¢>INTCN3S THEN 


anad"HIss 





PRINT “trvs.on}should be an integerfrvs. of FI "Fs 
GOTO 400006 
RETURN 3 
REM==—DETERMINE THE DAY OF 
WEEK 






=SAT 
43 
-LO#CO-2* (LOF1) 


CO=INT (YO/100) 
YO=YO-CO#100 


REM--WARNING: POSSIBLE ROUNDING ERRORS 
DY=INT ((2Z6#MO-Z) /1094+D+YO+ INT (YO/4)+INT (00/4) - 2400 
DY=DY-196* (SGNCSGN(CDY)+1)-1) 


REM--WARNING: POSSIRLE ROUNDING ERRORS 

DY=INT (DY- INT CDY/7)*7+0, 53 

RETURN 

REM=S==SYMEOLW CONVERS TON 

REM--TRYING TO BE CLEVER? 

IF AS<>" " THEN 42100 

PRINT "{4cursor. down} yon have the author’s consrats 
Program crashing!!!" 

GOSUB 38000 

REM--THE NEW SYMBOL 

POKE 254,ASC (AS): 


REM-- NUMBERS 
FOR N=O TO 9: 
AS=NM$CN) = 
SYS 826: 
NM$(ND=AS: 
NEXT Nz 


REM--LETTERS 

FOR N=0 TO 25: 
AS=LTSCN)s 
SYS 826: 

. LTSC(N=AS: 

NEXT Ne 

RETURN 


REM=NUMEERS 
REM 0 


DATA “ 900 0 oo oD be 


o O00 





home? (24cursor,. down? trvs. ond (écursom. risht? 


Bl a | 9 


50100 
50200 
50300 
50400 
50500 
50600 
50700 
50800 
50900 
51000 
51001 

51100 
51200 
51300 
51400 
51500 
51600 
51700 
51800 
51900 


52800 
S2900 
53000 
53100 
53200 
53300 
53400 
53500 


54000 


55000 


55010 
55020 
55030 
55040 
55050 
55060 
55070 
55080 
55090 
55100 
55110 


56000 
56005 


56010 
56020 
56030 
56040 
56050 
56060 
56070 


56080 
56090 


56100 


56110 
56120 
56130 
56140 
56150 
56160 


56170 


REM 1 


DATA" © 90 o o 


REM 2 

BATA “ 900 o 
REM 3 : 
DATA " ooo 
REM 4 
DATA“ oo 
REM 5 

DATA “oooo00 
REM 6 

BATA " 900 © 
REM 7 

DATA “ooooo 
REM § 

DATA “ o90 6 
REM 9? 

DATA “ ono o 


o oo 9 


o o ° 


o 900 0 


o oO00 


REM=LETTERS 


REM A 
BATA " ono o 
REM B 
BATA “no00 0 
REM C 
BATA “ 99000 
REM D 
DATA “ooo o 
REM E 
BATA “oono00 
REM F 
DATA “ooo000 
REM G 
DATA " saD00 
REM H 
DATA "9 00 
REM I 


DATA “ 900 ° 


REM J 

BATA " ° 
REM K 

DATA "o 00 
REM L 

BATA “o ° 
REM M 

DATA “ao OOD 
REM N 

BATA "9 odo 
REM O 

BATA " 900 0 
REM PF 

DATA “nono © 
REM Oo, 
BATA “ 900 0 
REM R 

DATA “sooo o 
REM. $ 

DATA “ ado 0 
REM T 

DATA “oooon 0 
REM wu 

BATA “o oD 
REM V 

DATA "oO 90 
REM -W 

DATA "“o 20 
REM X 


* 90900000 


o0000 5 


ooo O° 


onD0000 


000 D0 00 


oo oO DO OO 


oo oD 


o00no oO 


oo 0 O83 0 


ooo “r 


o0000"5 


0 ono “3 


90000 ro abi | 


so000 “: 


o oon "s 


oo ons 
o0000 ": 

pone": 
ooo000 “t 


00000": 


epoon o 20 on: 


ooo 9 ono “: 
° ° ve elect | 
90 no + Oo onD "3 
00 oo°0 ite 


ooo Mm DPO OD": 


DATA “o oo 49 Ds) oo 


REM Y 
DATA “o oo 
REM Z 


oO 00D ° 


DATA “sooo ° os) 9 


REM=DAYS OF THE WEEK 


DATA SMa TsWsTs FS: 


REN=DAWS 


° o's 
ea 


eQ000"s 


PEF MONTH 


DATA 311 JANUARY: 
DATA 28) FEBRUARY 
DATA 31+MARCH 
DATA 30;,APRIL 
DATA 3isMAY 

DATA 305 JUNE 
DATA 31sJULY 

DATA 31s AUGUST 
DATA 30;SEPTEMBER 
DATA 3i,O0CTOBER 
DATA 30, NOVEMBER 
DATA 31»sDECEMBER - 


REM==CONVERT CHARS 
REM PTR=ADR (AS) ~ 

DATA 160,004: 

DATA 1771042 

DATA 133,253 

DATA 136 

DATA 1775042 

DATA 1333252 

DATA 136 

REM Y=LEN(AS) 

DATA 1771042: 

DATA 168 

REM FOR Y=Y-i TO O STEP -1 
DATA 136: 


REM IF MID$(A$)Y+111)<>" “THEN MID$(A$sY+111)=CHS 


BATA 048,012: 
DATA 1779252 
BATA 201,032 
DATA 2403247 
DATA 1655254 
DATA 1453252 
REM NEXT Y 
DATA 203)241: 
REM RETURN 
DATA O96: 


56180 
E3993 
63999 
10520 
10550 
10590 
10605 
11000 
15000 
15020 
15100 
15210 
15270 
15500 
15560 
15600 
15700 
15810 
15820 
16000 
20000 
30000 
30100 
31000 
32000 
34000 
34140 
34150 
35000 
35500 
35520 
36000 


’ 
37000 

37030 
38000 

40000 
41000 
42000 
42100 
56000 
Aa 

Aas 


DATA -4738 
REM SCRATCH"calendar"sDO:DSAVE" calendars DO: VERIFY"#*"13 
REM SCRATCH" ca lenciar" Di: DSAVE"calendar"» D1: VERIFY"#"s 8 


10540 
10520 
10610 
10605 
10505 
10550 
15040 
15110 
15230 
15280 
15250 
15554 
15260 
15270 
15510 
15520 
10630 
10510 
10650 
30030 
34010 
34010 
10670 
$4125 
34160 
10660 
35480 
35500 
16100 
34999 
11009 
37030 
10530 
10560 
30050 
10550 
42020 
20630 
10101 
10101 
15230 
1555? 
38010 
10102 
10102 
32010 
10103 
10103 
10103 
20610 
10104 
35490 
10104 
35410 
10108 
16100 
10112 
10112 
16120 
34125 
35480 
10112 
15730 
10112 
15720 
10112 
10212 
10113 
41030 
10113 
10113 
10113 
10113 
10213 
10213 
10213 
10114 
20210 
31310 
10114 
10114 
10114 
10214 
10116 
31310 
35440 
10216 
10117 
10119 
10220 
10120 
10122 
10123 
34180 
10123 
10223 
10125 
10125 


10710 


15590 
15810 


15556 


15610 


35010 
34210 


16110 
35010 
11175 


10540 
10570 
30210 


155546 
10520 
15240 
15570 
42020 
20660 
15540 
34125 
10620 
15100 
20620 
20620 
30050 
35500 
30050 
35440 
10560 
16110 
16100 
15220 
20310 
34130 
35490 
15200 
16020 
15250 


10560 
15556 
10640 


15552 
41030 
10570 
10580 
30110 
20510 
20510 
10560 
20410 
40010 
15730 
10605 
30020 
15554 
15530 
31350 
35490 
15230 
15220 
20710 
31030 
10590 
34125 
20310 
35460 
15730 
20310 
10560 
31110 


15630 
15820 


15710 


16120 
35530 
11320 


42040 
10520 


20310 
10590 
15250 
15620 
42100 
37010 
15559 
34160 
10700 
15110 
41020 
20630 
30210 
35510 
30110 
35470 
10570 
16126 
16110 
15250 
31240 
34160 
35500 
15210 
16100 
15510 


10570 
20210 
10680 


15554 
41070 
10640 
10640 
30240 
31020 
30070 
10570 
20510 
40020 


10620 
20050 
20110 
15554 
34110 
35510 
15570 


34999 
31120 
10600 
34130 
30110 
35470 


34130 
31110 
311270 


15730 


31340 
35550 
11430 


40020 


31030 
10600 
15260 
15630 
42110 
37040 
15620 
34170 


15540 
41030 


30220: 
41070 
30240 
35550 
10580 





3331 
15720 
16110 
15540 





10580 
31240 
30020 


15556 


34140 


10580 
20620 


40030 


30220 
31310 
15556 
34125 
35540 
15630 


35550 
31240 
10610 
34160 
30210 


35570 


35440 
41040 
41040 


31360 
35540 


40030 


15020 
15270 
15720 
42120 


15720 


15620 
41040 


30240 


34100 
35570 
40020 


31020 
15630 
Bi3é60 
34999 
35550 
15230 


15550 


40020 
34130 
30030 


15558 


35470 


15550 
30050 
42110 


35490 
15570 
34130 
37010 
15730 


31310 
10660 
34170 
30240 


41050 


32030 
35580 


15030 
15540 
15730 


20410 


15720 
41050 


30290 


34130 


41070 


31030 
15730 
32010 
35010 
35580 
15520 


15610 
35440 
30050 


31020 


15552 
31030 
42120 


35510 
15580 
34160 
37040 
16110 


10670 
32020 


41060 


34010 


15040 
15554 
37030 


20710 


41060 
35470 


34160 
412080 


31240 
16100 
32070 
35440 
36010 
15570 


15620 
42120 
31070 


S1030 


15560 
31120 


42110 
31270 
34200 
38010 


34150 


41070 


34190 


15220 
15556 
37050 


31310 


44070 
35480 


34220 
41090 


16110 
34010 
35470 
15630 


15710 


41020 


20110 
31240 


31240 
35420 


341460 
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Programming Tips: 


Disk Show Data 


1@ sotc108G 

20 set#e.bZ2¢: ifstthena=st: sotoi 7h 

38° if~Z$=""thenza 

4@ ifascthZ$>=13therwrinttere.” BWreturnsa "i -erint#er, dos: seto2@ 

SQ swetat:ifat=" "thermaitiSs, it: cokeiS&.8 

64 ifat="e"thenrrint: print" ZEFile read aborted": sosub3@8G: satclaada 
65 ifas="h" thensosuklea7e 

7Q ifas="s"andrr=Sthens=stia 

86 ifat="n"thens=8 

90 for j=Otos : next 

180 print#er. dofbh2$;i : goto2h 

176 erint#er,.dofh2$: rerintré"Ze+++ status word is: “a ++++" 

188 prints end of file": soetclaedqea 

1@@@ rF=chrF613>: ormenitsS.&8.15: rokeS3468.14 

1416 print"SWDisk Show Datad"takt252"D.Mi lnes-Mar Sere 

1028 print" "Z8Prosran will read and list oan screen or"rs"Zerinter the contents"; 
1038 erint” of & seauential or"ré"BZrelative file on disk." 

1648 print"2This will show what was intended ta ke"r$"Zerinted an the file": 
1056 erint” wee actually erinted"ré"there ku the PET. 

1468 scsubsece 

178 print’ See DIRECTIVES #* 

1086 erint" Bhi let the erog¢ranm is rurinine 

1438 print’ SPACE Will halt listins 


1146 print’ = Will slow down listing 

1118 print"S ri will akart slow listins 

1128 print" e Will abort erogran 

1138 rerint’2 kh will suspend listing" rrinttakt(9>"and disrlays this rave 


1140 rrint"Slo the mame file rpranet 

1158 eprint"! RETURN will akbert 

1160 rrint'2 a will list directories 

1178 print"S kh disrlass this rae": gosubSeGe: i ff1$<>""thenreturrs 
1186 rerint' sR" 

2688 ineut"2ENamne of File SRM | F1E i FF 1S="A"thendirectory: sote28ha 
2O1G iffils=", "thensosukb4BGG: sotol Be4a 

2815 iff l$="h"thenscsublare: sotc2eeaa 

2h28 doF=""" pre=3 

2O38 print’ BMuteut toa printer: PAG: irmuteat: ifat="s"thener=4: dags=" 2" 
2848 orenrr., pr 

2QS58 eprint: print’ BeG@eauential or BBelative 8B"; > inwputes 

2h fell" anideECl> "Ss" thenerint"” Maley": sate2hse 

2B7R print"MBMisk drive BEBE" : > ineutdr = 

2068 ifdrét<>"G"anddr$<l"1"thener int" Male!" : sotesare 

2O30 crint' SS" oren2.S. 2. tar" Mt LESt". “te se" "> cosuk 1 GGHe 

2168 rerint#er.deé" "File Name = BB £1$rErs: sotaza 

3h86 print’ SS": poke216.22: rrint"ZMSPACE to continue" 

SHIA setat:ifatc>" "“thenseia 

SB2B return 

4408 ifer=4thenfari=iltolG: crint#4: next 

4818 return 

1GQBB irmut#is. ené.emF.et. es 

14618 ifernis="GH" thenreturn 

18828 ifenP="G2"thenc losez 

1838 print" SADISC ERRORS": erint" 2" emt: ag="e" 

18040 closerr: closes: ifags="e"arF l=". "thenc loseiS: end 

11688 scsubsGG8: setoii sa 

63999 scratch"disk show data": dsave"disk show data" 
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BRING TO YOU, NOW ON CASSETTE AND DISK 
GAMES OF THRILLS & SKILL FOR ALL THE FAMILY 


NEW PROGRAMS 


Best of Arcade brings together the three most popular Petpack games, 
invaders, Cosmic Jailbreak and Cosmiads. These old favourites have been 
updated to run on 80-column machines also! 

MPD 121 BEST OF ARCADE £22.50 - DISK PACK 


Best of Treasure Trove gives you twenty of the best games from the 
Treasure Trove series, including four arcade-type games, Night Drive, Car 
Race, Breakout and Money Table! There are simulation games, brain- 
teasers and more, making this package the best value ever in games! 
MPD 122 BEST OF TREASURE TROVE £22.50 - DISK PACK 
Assembler Tutorial is an extremely well thought out cassette-based 
package which teaches Assembly Language programming. Now for the 
-first time, you can sit at your computer and learn at your own speed with 
this self contained course combining lessons with. hands-on practice! 
MP 124 ASSEMBLER TUTORIAL £50.00 


Resident Assembler for all PETs 
With excellent documentation we examples. 
\MPTI9RAMP £22: 50 


Disk Packs available in either 8050 - D8 format-or - 
3040/4040 - D4 format. Please state.08 or-D4 = 





"MPD 123 PUB GAMES. « 


PUB GAMES 
This latest disk package brings you five totally new games, never before 
seen on a PET screen! The programs will all run on 80-column machines 
also! 
DISASTEROIDS - Your mission - pilot your spaceship through the 
treacherous asteroid belt using your lasers to blast as many asteroids as 
possible. The PET version of the famous arcade game! 


STELLAR WARS - Your spaceship is being pursued by the fighter ships 
of the evil Empire. You must take control of the ship's laser cannon. Get the 
fighters in your sights and blast away. The future of the universe depends 
on your skill and accuracy. 
WAR! - You are the captain of the British torpedo boat. You must steer 
your ship through the minefield to-destroy the four shore bases. Unfortun- 
ately, you only have two torpedos at a time, so ag must get through the 
minefield again to rearm. Prove that we still rule the waves! 
STAR FIGHT - The Alien invaders are coming again! Control your taser 
cannon to blast their ships out of the sky and destroy their missiles and 
bombs. Accuracy and quick reflexes are essential. 
DEPTH CHARGE -. Your mission - seek outeand destroy the enemy 
submarines. They are armed with mines which they release to float up at 
ees You must control the position ofyour ship and vowmmeets _ 
destroy as many subs and as _ poser isnt ti 


These games are. 


MANUFACTURED AND DISTRIBUTED BY AUDIOGENIC LTD. 
M7 N=) 8 fe)! Relele] ome) 7-\m 1.t-mme). m2) 1,1 168 md 10) 


PU) o) (ole) 1] (om MoM =10) @:1:0m-1-7-V0)1\ (CME =1 21-1 <9 
Tel: (0734) 586334 
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Cursor Positioning on the Pet 


One of the. most popular (?) and easiest ways to 
position the cursor in a particular position on the 
PET screen and displaying a message at that posi- 
tion is as follows:- ; 


1 


ae 1G PRINT" Setsteleteleia" TARY 125 
"MESSAGE" 


which will appear as shown below:- 





Another method which | favoured for a long 
time was to initialise two strings —cr$(CURSOR 
RIGHT) and cd$(CURSOR DOWN) to 39 cursor 
rights and 24 cursor downs respectively. 


2. 1G FORIS1706:CRE=CRS+" RR BRD 
:MEXT 

26 CRE=CRE+ WOR 

2G CUS=CLS +" AALS e Tete OTe eletetetete 
eeTeTeTeteteten" 

4@ PRINT LEFTS<CDS.12>LEFTS 
(CRS. &2 "MESSAGE" 


which would do the same as number 1. 


The positioning of the message on the screen 
could be changed by varying the numbers 12 and 
8 in left$(cd$,12) and left$(cr$,8). 


3. The third way is to use the memory locations 
which hold the row position and column position 
of the cursor — 216 and 198 respectively. 


Thus 1@ PRINTS" -POKEZ16.12:POKE 
198.8: PRINT "MESSAGE 
40 
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would give similar 
example. 


results as the previous 


Both the last two examples could be incorporated 
in a sub-routine as follows:- 


1@ CRS= < 39 CURSOR RIGHTS > 
2@ Clig= < 24 CURSOR DGHHS > 
3S@ AS="MESSAGE" :R=12:D=8 

4@ GOSUB 2aG 

lS a ai 

ECG wacnsccece 


2GGG@ PRINT LEFTS<CUS, DOLEFTS( CRE. RD 
AS” -RETURH 


and Similarlsa far the wake excmne le. 


One other method is to use a short machine 
code program which uses the built in ROM 
routines of the PET. 

a. To evaluate the position of the cursor 

b. Position the cursor on the screen and then 
printing the string. 

| use this routine now and extend it to blank out 
portions of the screen as an extra facility. The 
routine is relocatable and in fact | tuck it behind a 
REM statement at the beginning of the program. 
More about that later. 

The SYNTAX of the routine is 


sys(n),r,c,1:Printas 


where n = entry point of machine code 
r = row which cursor is to be positioned 
c = column where cursor is to be 
positioned 


| = O (zero) for the print facility or any 
value less than 256 for the blank function. 
The routine is shown as assembled in the se- 
cond cassette buffer (sys826 to call) 


a) as a HEX dump 
b) in assembler for those with this facility 


@S3A 


. G@33A 


G33A 
@33A 


33h 


BASF 
GSA 
@S3A 
G33 
G@23A 
G23A 
G23A 
f&33A 
G33A 
G@33A 
GA3A 
G33A 
@33A 
33A 
G@33A 
@33A 
Ga2A 
G33A 
G&33A 
G@33A 
G238 
G33C 
S230 
@33E 
@33F 
Gade 
G45 
347 
G34dA 
340 
G@34F 
S352 
G@355 
G35g 
ASSES 
SiR 
GS50 
S364 
A361 
GI63 
G364 
S365 
A366 
367 
A362 
G363 


46 
SA 
43 
93 


48 


Z2@F SRE 
Lat4a4ce 
S603 
Z2@FSRE 
ZeT4CS 
S6Ce 
G7 FEG 
ZGFORBE 
2en4cs 
SA 
FaaS 
AS2@ 
et 


5 RRR RRR EE RR RRR ERR 
» * D.JMILHES .. FEBRUARY 1962 
pO oo ----------------+---- 
> * PRINTS STRING AT 
» *® POSITIOGN CH 
» ® SCREEH 
rae 
> * SVHTAK. SYSCRKRED RCL PRIWTAS 
519k Sete i ee i 
’ #® BLAHKS FORTICH 
» *® GF SCREEN 
Be 
> RE SYNARAL. SyYStaawase eR Cob 
yA Iara ae ated es 
Pee P 
> # R=ROW C=COLUMNW L=LENGTH 
2 oR 
/ ® ++ LG FOR STRING PRINT ++ 
+R 
» 3: ++ RELGCATABLE — B'YTES=47 ++ 
Sy SRA AR RAEI EE EEE EE EEE HE REE 
#=SLE 
FHA 
THA 
FHA 
TA 
PHA 
Jom SEEPS sCHECES FOR COMMA 
JSR #CSIid SEVALUATES EXP 
potas $0S iSTORES *% AT 216 
sk S5EFS 
as $CSli4 
ST% C6 sSTORES *% AT 198 
ISR #EGrF sPOSITIONS CURSOR 
JSR “S5EFS 
ISR #CSi4 
THA | 
BEQ RETURH .=@ THEN STR PRT 
LIA #32 » BLAMES 
ELAHKA ere $FFI2 
{Ee 


BHE BLANKA 


RETURH PLA 
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Hex dume of mc cade rrazram 


PC IRG : AR 
» BSG E455 34 33 38 


G32A 4&@ SA 4 96 
26 Tid C8 Ss 
2a D4 Ce 6 EG 
@352 24 F5 RE 2a B4 CS SA Fa 
G2 AY 26 2G Iz FF CA DG 

: @362 FA 68 AS GS AA G& 6@ FF 
.: @36A FF FF FF FF FF FF FF FF 


S 2@ Fo BE 
= 26 FS. BE 


REAL. 


M/C Code behind REM statements 

The PET Basic Interpreter ignores REM 
statements and anything behind them. Thus 
numbers can be placed in the memory locations 
between the REM statement and the zero byte 
which denotes the end of line. 


Tare in the followings shart erosr am 


AS="TEST" 
SYS1G31,19,28, 4: PRINTAS 
FORT=17T020@:HEXT °-REM DELAY LOCP 
FORT=S32768TOSS 767 > POKEI.65 
NEXT:REM FILL SCREEN WITH “R¢ 
FORT=1 T0200: HEXT 


“IN Cn hlLgaPyeG 


How ture in 


essed Cfaollowed keys a returrn> 





The best position to place the M/C code is at 
the beginning of the program as the program can 
be edited without the entry point of the M/C code 
being moved by the PET when the operator is 
editing the program. 

For example if the programmer wants to add a 
line in the middle of a program the PET moves all 
lines following the added line up in memory to 
make room for the additional line. Thus all 
memory locations of lines above the added line 
will have been. changed. Similarly if a line is edited 
the PET moves the basic program up or down in 
memory to compensate for additions or deletions. 
Also line number links are also changed. 

If the M/C code segment is placed at the begin- 
ning of the program say at line $O then subse- 
quent editing or additions to the program will not 
change the M/C code segment — providing there 
are no zero bytes within the code — which the 
PET will interpret as end of basic line and play 
havoc with the complete program. If zero bytes 
are inevitable then the M/C code will have to be 
typed in when the program is completed and fully 
debugged. 

The following explains how to locate the cursor 
positioning routine behind a REM statement at 
line $O. 


line #@ with 47 “#" :- 


SYS1@31.19.26.255:REM BLANKS FORTICN GF SCREEH 


The fallowins should anrear - don’t worrs tac much if the secard line 


is not exactlhsa as below - 
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CE 


Ce “Ira sr > aco: xr ours sp 


The flachins curser should ke next ta the dot. Naw type in 


-m G46 S466 


The memory locations fran $6460 £1424 decimal - start af kasic? ta 


F446G should ke disrlased as fallaws: 


G4aa ac 27 a4 oe ear) za 
Gd4ee 2A 2A 2A 2A ZA eAZA 2 
G41G 2A 2A 2A 2A 2A 2A 2A 2 
G418 2A 2A 2A 2A 2A 2A ZA 2A 
420 2A 2A 2A 2A 2A 2A 2A 2 














G429 2A 2A 2A 
G43 2A 2A 





G@43S3 G4 G1 G@ 41 24 Be 22 34 
G@446 45 53 54 22 GG SB G4 G2 
G@448 GG GSE 31 3@ 3S 31 eC Sl 
@45G 398 20 32 36 2C 38 3A 993 
G@458 41 24 GG 7S G4 GS GG G1 
G@46G 49 Be G1 Ad 32 SG SH SA 


The Sf is the hex rerresentatian of REN. The 26 following is the hex 
value of the space following the REM statement. The Za’s represent the 
eters (#) and it is in wlace- of these we are acire ta ture the MC 
cade. : | 

Using the ue cursor -- tral key woasitian the cursor caver the first Za 
and tare in the hex numkers as shawn be low, 

DON’T FORGET at the end of each klock af nek runbers eress 


“Fete” 
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G4aG 
a4Gg 
G41& 
&41G 
G42 2G 
G42 
9aa8 
' G435 
G@44a 
GidgQ 
454 
@453 
4eG 


aS 
¢ 
= 


4g 9e 
Ce 
ce ¢ 
BE 


et 


oE 


alt an ba 
eC 32 


24 


B2 


Ga 
43 
ne 
Cé 
tig 


2 
2G 
2a 
cS 


41 
22 
3a 
3a 
rs 
Aid 


24 
iS) 
2C 
ei4 


bees 
me 


Wher all the hex rnumkers 


when satisfied ture 


¢ s 


se te 


GG og 


BE 
YF EG 


Ge 
22 


G4 


oA 
ei 
se 


2a[4e 


BE 2 


2C: 











have keer, tured in check them carefully and 


brine wou hack ta kas 


sic. 


The listina of this perawran should lock like the fallowire 


6 REN HRUNHPRIMTHH PCOS 


APPENDLEFTSDINRENMANE PCOS 


TOVERFLOW COS APPENDLEFTSRUNM< STEP BACKUP RM ITSHEADERF=<MOT C+ 


APPENDLEFT SDI MASC 


Sane USe. 


1 | $= n TE ST n 
2 S'7S1G351,15,.28.&8:PRINTAS 
3 FORI=17Ta2 GG: HEAT REM DELAY LOOP 
4 FORT HS2 °SSTOS2 767 > POKEI. 6&5 
3 HWEXT: REM FILL SCREENW WITH “AY 
& FORI=1TaG2 “OG: NEST 
7 SYS1E31,.1¢S sean 6 REM BLANKS FPORTICH GF SCREEH 
REAL’. 
Hom save the rroagran “just in case wou have made = mistake in 
taring in the hex numkers> and then FUH the rercorsun, 
I howe the ideas in the article will pramote some interest in 
experimenting with the vaericus routines and wi ss erave caf 
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MASTER ...a new concept 


MASTER is a totally new concept - a camplete package 
for program and system development. MASTER adds 85 new 
commands to Cammodore Basic IV, so that you can 
speedily and efficiently develop your own reliable 
software, whatever the application. With MASTER your 
programs can be up and running in double-quick time, 
and will out-perform standard Basic IV programs every 
time. One MASTER command can replace whole paragraphs 
of Basic code. With MASTER, projects that would have 
been non-starters can be tackled with ease. Add MASTER 
to your Pet - and let your Pet amaze you! 


ISAM DISK FILES 


MASTER has 17 commands to give keyed-access to your 
disk data. Data can be retrieved/added/dleted/updated 
fran your files by ASCII key (up to 30 bytes long). 
You can read .forwards or backwards through your files 
by key, starting anywhere. Or for extra fast access, 
you can read your files in creation order, even faster 
than reading a standard sequential file! For mo-line 
data entry, file indexes can be updated optionally in 
batch mode. Up to 10 MASTER files can be opened at 
once, with no space restrictions except disk capacity. 
You can mix MASTER files with standard DOS files. 


SCREEN GENERATOR 


MASTER has 20 commands to give you camplete control of 
the screen and keyboard input. Input/output can le 
done through screen zones, which may be formatted, eg 
for numerics/alpha/ dates. Screen layouts (with zones) 
can be saved and loaded fran disk, or can ke swopped 
around within memory with the paging system. Windows 
can be declared, with full scrolling capabilities. 


REPORT GENERATOR 


MASTER has 10 commands to give you camplete control of 
your printer output through report formats. Each 
report format can contain up to 128 output zones, 
which can be preformatted as required. Report formats 
can be saved and loaded fran disk. 


BASIC ENHANCEMENTS 


MASTER has 18 commands of Basic enhancement including 
autanatic date control - 20 place decimal precision 
arithmetic - data packing/unpacking to save space on 
disk - direct block access to disk - variable transfer 
to/fran buffers - searching within strings - string 
conversion upper to lower, lower to upper case - GOTO 
and GOSUB with variables as line numbers - program 
scroll up and down - and a NOLIST feature to protect 
your programs fran unauthorised listing. 


BASIC ENHANCEMENTS (96K only) 


MASTER has 17 extra cammands in 96K mode (CEM 8096 or 
CBM 8032 upgraded or with CP/MAKER) including the 
"Toolkit" type commands AUTO, DELETE, RENUmber (all or 
part of program), DUMP, ERROR, FIND, TRACE/OFF (shows 
whole program line at top of screen). All of these 
except AUTO and ERROR can be included in programs. In 
addition there is CALL for calling your machine—code 
routines (while passing up to 15 parameters), FETCH 
for loading machine-code fram disk (without disturbing 
Basic pointers), PLOT and RESET for medium resolution 


screen plotting (scale 50 by 150), PRINI USING for 
formatted output to screen or printer, IF ... THEN... 
ELSE ... for compact conditional programming, STOP KEY 
enable/disable, and HARDCOPY to dump the screen to 
printer (margin can -be defined). 


MEMORY MANAGEMENT (96K only) 


MASTER gives total control fran Basic over the 64K 
expansion memory. 26K is reserved for variables, which 
are maintained even while you edit or load programs. 
Up to 15 programs can be held simultaneously in the 
46K program area, and you can switch fran one to 
another autamatically, or use GOTO or GOSUB and return 
to your main program. 


HARDWARE SUPPORTED 


MASTER is written in 6502 machine code and _ supports 
the CBM 8032, CEM 8032 with CBM 64K Expansion Memory 
or CP/MAKER, and CEM 8096, with CEM 4040 and CEM 8050 
disks. MASTER is supplied with a camprehensive User 
Reference Manual, Quick Reference Guide, Diskette with 
demonstration programs, anda "dongle" which can ke 
attached to either cassette port. Our support service 
is FREE, so we try to ensure that our documentation is 
as good as possible - so you don't need to bother us! 


PM 96 


PM96 for the CBM 8096 contains the Memory Management 
and 96K Basic Enhancements of MASTER, as a _ separate 
package, which includes a User Reference Manual, Quick 
Reference Guide, Diskette with demo programs, and 
Support Ran for the front (UD11) Expansion Ram slot. 


Price List 


MASTER Development System ........ee06. eeweeine £300.00 
PM96 Basic Enhancement/Memory Management areas 

KRAM Keyed Disk Access (state which disk) .... 
COMMAND-O (Basic IV) (state which Pet) ....... 
DISK-O-PRO (Basic II) eee e cece ceeceeeececeses 
SPACEMAKER 4-Rom adaptor (not 8096) .......... 
PRONTIO-PET hard/soft reset (Basic II) 


SPECIAL OFFERS 


VISICALC 96K RRP £180.00, less £35.00 ....... £145.00 
VISICALC 32K RRP £159.00, less £30.00 ....... £129.00 
WORDPRO IV/V+ RRP £395.00, less £98.75 ....... £296.25 
WORDPRO III+ RRP £275.00, less £68.75 ....... £206.25 
WORDPRO II+ RRP £140.00, less £35.00 ....... £105.00 


ORDERING INFORMATION 


Orders can be made by post, telephone or Prestel. ADD 
15% VAT TO QUOTED PRICES. For same-day service, 
telephone 01-546-7256; we accept cheque/PO and ACCESS 
or BARCLAYCARD. (For over-the-counter sales please see 
your nearest Canmodore Dealer). For Mail-order, write 
to our address below, or to air FREEPOST address (no 
stamp required) which is: Calco Software, FREEPOST, 
Kingston-upon-Thames, Surrey KT2 7BR. [Ref ADS. 


Kingston Hill 
(01) $46-7256 


Lakestde House 
Surrey KT2 7QT 


Lalco Sottware 





Basic Programs 


The four function keys on the right hand side of 
the VIC are probably the most neglected part of 
the whole computer. Relegated to ‘PRESS F1 TO 
START THE GAME’, and dismissed with less than 
a page of text and a simple basic program by both 
the VIC REVEALED and the PROGRAMMERS 
REFERENCE GUIDE, the only way to use them as 
true definable function keys has been to spend 
£35 on one of Commodore’s utility cartridges. 

That is until now! 

Using a simple 160 byte routine which sits at 
the top of BASIC memory, you can assign a 
separate function up to 8 characters long to each 
of the 8 keys. 

This routine, which is loaded by a BASIC pro- 
gram, becomes part of the IRQ (Interrupt Re- 
Quest) vector. This interrupt is the one which the 
processor calls 60 times a second to update the 
jiffy clock; scan the -keyboard and check the 
RUN/STOP key. 

Enter the program below and SAVE it before 
you RUN it! When the program has finished, it 
NEWs itself. 

Now type RUN and press RETURN. All being 
well, the screen should clear and the messages 
“FUNCTION KEYS DEFINED’’ and ‘‘READY.’’ 
should appear, along with the cursor. If you get 
the message ‘‘DATA ERROR’’, then you have 
made a mistake entering the data statements in 
lines 10-120. CHECK THEM CAREFULLY! 

Assuming that you have entered the program 


PRELIM a a a a AR ae A HE 
REM* * 
REM# DEFINE KEYS # 
REM# # 
REM* BY DAYE TONG # 

# 

¥ 


REM# (C0) 777/782 

REM# 

FRE Maa 

1@ DATA 120,163,128, 141,208.39, 169,20 

20 DATA 141,21,3,988.133,56, 169,96 

30 DATA 133,55, 96. 160,64, 169,9.153 

40 DATA 191,29,136, 288,258. 96,234,234 

5@ DATA 72,138, 72, 152, 72, 165,197,197 

68 DATA 251,240.44, 133,251,41,39, 201 

78 DATA 39,208, 36, 24, 163,251.42, 41 

88 DATA 240,172,141.2,248,3,24,185 

9@ DATA 8,185,128, 133,252, 169,29,155 

1@@ DATA 253, 168,0.177,252,153,115 2 

11@ DATA 20@,192,8,.208,246, 132.198. i194 

12@ DATA 168. 184,178, 164, 76. 191,234.170 
199 REM LORD MACHINE CODE ROU” INES 
200 POKE 55,96:POKES6, 29:CLR‘Z250:FOR x=@ TO 95 
218 READ ¥:Z=Z+¥:POKE 7520+K.'Y:NEX™ 
220.1F 2¢> 12276 THEN PRINT"DFTR E= OR! RE-ENTER" : STOP 
238 SYS (7526)‘SY¥S (7539). 

235 REM S78 752@ ACTIVATES THE KEYS 
236 REM SYS 7339 ERASES THE FUNCTIONS 
248 FOR *=1 TO 8:READ NS 


WOnnatrunye 
a 





258 L=LENCNS):IF L>S THEN PRINTXjNS PRINT"S CHARACTERS MAAIMUM! "> STOP 


268 FOR Y=1 TO L:P=ASC(MIDS(N$, 4.130: IF P=95 THEN P=13 
274 POKE 7EA7+%+RRX.PENEXT YINEXT | 3 

280 PRINT"SFUNCTION KEYS DEFINED." : LR: NEW 

298 REM 
299 REM ‘FOR CARRIAGE RETURN ENTER “¢7 
3@@ DATA "LIST#"."GOSUB". "RUN©”, "PRINT" 
318 DATA "GOTO", "CHR$¢", "LOAD", "RET JIRN¢"” 


READY. 


46 


Commodore Computing 


PUT YOUR OWN FUNCTIONS HERE ¢ MAXIMUM 3 CHARACTERS! > 





correctly, pressing the function keys should give 
you the following functions: 


F1 LIST + CHRS(13) 
F2 GOSUB 
F3 RUN + CHRS (13) 
F4 PRINT 
F5 GOTO 
F6 CHRS) 
F7 LOAD 
F8 RETURN + CHRS(13) 


If you wish to change any of these functions, 
simply alter the DATA statements in lines 
300-310. To eliminate the need to press carriage 
return, you can add one by simply entering’ ‘ at 
the appropriate point(s). 

For eaxmple: if you wish to LIST the program 


whenever a key is pressed, change the ap- 
propriate DATA statement to “‘LIST  "’. 
The function keys can be cleared by pressing 


RUN/STOP and RESTORE together. To re-enable 
the keys, enter ‘SYS 7520’. 
1 — You can only have up to 8 characters max- 
imum per key. To enter longer commands use the 
abbreviations (such as P SHIFT O for POKE) 
listed in the manual, or allot parts to individual 
keys. 
2 — To change a function, the program must be 
reloaded. 

Finally, to disable the RUN/STOP key while the 
function keys are in operation, change the last 
three numbers in line 120 to 194, 234, 170 





DO VIC ROBOTS DREAM OF ELECTRIC SHEEP * 


4 REM PET BEWELUS 
REM EXCHANGE 
REM bi gps ois 
PORES? ‘PORE SESE9, 246 

PR INT oR pee WIC ROBOTS #8": FR THT" SIstelele[sieleleleleleleleleleeleyereye) 

SS ANY: KEY tO STOP" 

GOTOLSa 

5 PRINT" StaMDe” 5 FORI=1TOPH¢P.G@>°PRINT‘@!: (HERT: FORI=1TOPRCP. 13: PRINT 


2 


en ie ee 


Pity 0 sry fe at Pha ml 
= ma m7 Wye ye ee & ot] 


ia NEST : 

i7@ PRINTDS<FNF OM? 9LECFMF CX) ORE CPM OM USC ME O89 o RETURN 

186 FORI=1TO16:GETHS: NEXT 

194 H=5: DIMDS¢S). LECS>, RECS), USCS, PHCP. 13: DEFPMPCMISRNDC 1 #541: README 
268 FORI=1TO% :READDS$i 1) -D$<19=1¢¢ 1948s: HEMT: README: FORT=170"  READL< 13 
210 L 


$C TS=LSCT3+88: NEXT: READMS : PORT=1 708: RERDREC 19 RSC] SRS 0 1 +8: MEXT 
oe 


tat Pa a 
‘i 


TH im] 


226 FORIS1 TOM :READUS¢I) :US¢ 1) <L$6 1948: NEXT 

S30 PHCG. 195? :PHEG,@)=1 PECL) 1)=?° PECL. 09=6 

240 PREZ, 1d=7 PHC, G)=11:PECR, L=7 PEED, @o=16 

25@ PHC4, 12=16°PH64.99=1:PEC5, 19=16:PR65, ao=6 

26@ PHOS. 12=16:PHCS.G3=11°PNC7, 19516: PEC?, Gd=16 

270 DATA’ “ORS.” * 2 Ws. 


=A 


faa ho bo Bh oo 


DATA" "." SP" TORRES Aes et BREE! SRR ‘ 
DATA" 3° S TORRE" Re "2, We) a" 
DATA" oS @ "HSREES 2. BES) oS TU os” 
DATAY  & "HERE! foe URE oS SU Ce" 
DATA" &° Sy "SERRE * REE oe, BR ? 
ke=" Sa aed 

P=INTCRMD« 1 2#59 °PRINTMIDS¢k$,P+1.19) :GOSUBieE 
GETAS: IFAS<2"" THEN48a 

GOTOSFa 

PRIHT° SES". (POKES6e79. 27: END 


Rio oo oy on bo hae 
eaTyy oe ee ee a ee a 


= 
ate 


CHARACTER BUILDING EXERCISES 


& REM PET BENELUM 
& REM EXCHANGE 
& REM NETHERLANDS 


PORES6E7°3. 42° PRINT SM CHARACTERGENHERATOR #": PORES@8, 8 
POKE ee we. PEER ¢ SE Ie RUWIS8 

CS=25S#PEEK (52 9+PEEK 651 5 

FOR ISCSTOCS+511:FOKEI. PEEKS T+32°6s-CS5 > HEXT 

PRINT" OLRUHISe" -PRIHT"RUM"  POREISS. 3 ‘POREGS1. 13° POKREG32.13:POKE633, 


an 
ft a 1 


3 


JT) 60) fs. 2 fa te 


ig os 3 


(PEEK (529+PEEK (Si) 
VHS =1GBG+PEEK (300) P=l2: BG=1:BR= 1 


Uy 

S53 oe: ‘CL =22 
S=2GR 
“Ft 


539 
Lt, 


CREM SCREEM FORE LOCATION 
“REM SCREEN FPOXKE VALUE FOR CHARACTER 





Pec Pee PR PRD Pe eee ee te ek eh Bee 
eye eT ee em me 


fe Oy) fa ee 


GOTOSAR 
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PRINT "39"  : 
PRINT "al" (R=6 
P=PHACE 
IFF=8THEN 


TR en RN 
=? Wt tt tat fa 


20 ba hoa ha Ra ba 


PA) fa i fe es Eh oo mo 
re Wt 
The 
aa am | 

4 

ll 

4 
pep 4 

od 

wie 

iT} 





41 LT ERC SL 
328 POKEZ+3072 
PL et sare TRAF="" THENSS8 


REM CURSOR “CONTROL IP TIONS 
powouiinuae Sieaicse. a 3 
A =P ER ATC =P THEHCHA : cr ci] To Beate) 
TFAg=" SY THENCeC+t | GOTOLS 
TFAS= "EP AMDC=8THENC=F : GOTOSS8 
TFAS="9P THENCHC- 1: GOTOSSe 
[FA$=" 8" ANDR=PTHEHR =: SOTOoSSe 
IFA$= "8" THENR=R4 1: GOTOZS0 
TFAS="""ANDR=SGTHENR=? : GUTOZSA 
[FAf="")" THER SRE-1 > GOTOSSe 
[FA¢="S3" THEHS Fe 

IFF=1 THEHS68 

REM DEFIHE NEW CHARACTER OPTIONS 
IFA#="+" THEHMPORE?. 81: GOTO2S8 

a IFA#="—-"THEMPOKE?. 46: 5070258 

B@ IFA$="="THENP ee 

M IFA$="T)" THEHS68 
a 


£23 ie 


ow Ls ae ~ OR 
soe eee Ee es 





at 
cl 
“ry 


fad Cae 3 he 
ee be 
i 
1 


ye me iniic 
ct Woe Wes Ee Oe eh he 


lO 0 70, OB oo ae ao 
(Ee es 


On fs ep fe fe th 


te 


S26 [FA#="F" THEH6SS 

S38 IFA$="B" THEN? Se 

S48 GOTOZSa 

Soa FEM FEVIEW CHARACTER SET OFPTIOHS 

Sea CR=FHEC a 

Sra@ IFA$="H"THEMPORE Ses) 9. 248: GOTOSSa 

ssh [FA$="E"THEMPOKESES6S, 248 :>F =a: G0TOrS6 
Son GOTOSSA 

bHG FPORESESES, 255: R=4:C=8: tL=FNACas  IL=32 
ciel PRINT IMBABCTEES" : PRIWT"HITELMNO" PRINT "PORSTUYL" 
r=] 


oy 
at! 


PRINT" I" 4CHRSC Sd 04+ HER se" PRINT OC Oe ee 
PRINTS!" SPCC123; "S0PRTIONS "PRINT 
PRIMTSPOC18>; "SN HEL CHARS" 
FRINTSPCC1G3; "SE EDIT CHARS" 

PRINTSPOC tao: "ao GuITe" 

BC=FPEER ¢ 38408 > 

GOTOSSa 

REM UPDATE SHARACTER DATA IH TABLE 


7) Oy 0, Oy OT 
Pt fea 
mio: 


veh i ee ee 


| 
se 


yg om oy a 2 


foe 
eg 
esr me ee 


mg eT Oo 


SM=SM-2 TDREPEER (PHASE o=S1 > HEXRTC 
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TO PRAT! Osa cee oe Th: 


PRINTS}:  M=CS+S4CR : FORR=@TO? : SM=8:FORCSOTO? : D=?-c 


t2 POKES6969. 240: PRINT "I": 


" OPRIHT"@les4 


fell POKEX+R. SM: FPRINTSPCCS25 SM: HEXTRE 

Pa R=8:C=8: G0TOSsea 

744 REM EDIT CHARACTER FROM TABLE 

Toll S=CS+tS#CH PRINT": PORR=O7TOF : Y=PEER SA+Rh3  FORCHaTOP? : 2s} 
fee ede: oes: TFY SPSS THENG=81 : y='-S5e 

Tre POKEZ. O° NEXTC. BR: R=8: C=: G0SUBSSa: GOToSSE 

788 REM BASIC STATEMEHTS TO DEFINE CHARACTER 

7S X=CS+SeCE > PRIAT " Seleleleleleiere)" 

Se 


EMG 


Sar 


PMACE 





‘PRINT S204] te" 
7": PRINT" 


PRINTLH: "TATA"; RIGHTS (STRECH? . -1+LEMCSTR#¢X9 995 -FORI=* TORE 


How to make the best _ 


home computer in the world 
even better. 


Peripherals to turn a powerful computer 
into a super-computer for the professional. 


With VIC, you have the finest home computer 
money can buy. And the more you use it, the 
more you will ask it to do. 

Pretty soon, you'll want to extend VIC’s vast 
potential to the full; and there is a wide range of 
VIC peripherals to help you do it. 

Disk drives, disk-based software, a printer, 
cassette unit, joysticks, paddles—with these, 
VIC computing becomes total computing: giving 
you true professional power and capability. 

We describe the major units here. 


VIC PRINTER 





The VIC Printer, 
like all VIC peripherals, offers a very high speci- 
fication at a very competitive price. 

It will print programs, letters, business data, 
graphic displays and so on. 

Its main features include: 80 characters per 
line - Tractor feed dot matrix *30 characters per 
second print speed * Full alphanumerics and 
graphic printing * Double-size character 
capability * All cables and leads. 


VIC FLOPPY DISK UNIT 


The VIC single-drive Disk Unit provides a 
fast, accurate and efficient means of storing and 
retrieving data and programs. 

Together with the Printer, it transforms the 
VIC 20 into the ideal system for the small 
businessman or serious computer programmer. 


Features include: 174,848 bytes capacity - 
Uses soft-sectored standard 5%” single density 


floppy disks * Direct i 










Intelligent 
system in- 
dependent 
of VIC. 
(VIC RAM not required to 
run it). 

EXPANSION MEMORY CARTRIDGES 

Special plug-in cartridges are 
available to expand VIC’s ggg 
memory. 3K, 8K and 16K 
RAM packs plug directly 
into the computer. 

A Memory Expansion 
Board is also available 






to develop VIC’s capabilities to the maximum. 


For full details of VIC 20, its peripherals and 
software, and a list of your local dealers, contact: 
The Commodore Information Centre, 
675 Ajax Avenue, Slough, Berkshire, 
SL14BG. Tel: Slough 79292. 


ee eS - 


rb 








commodore 


C 20 


The best home computer in the world. 
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814 PRINT". "; RIGHTS(STRECPEER  To9.-1+LENCSTRECPEERS T3959) °MEXTI-> PRINT: 
PRINT?RUN @" . 

S26 POKES@G. PEEK CS8G0+1:POKEL9S.9:FORT=87T0S:POKEI+631.13: HET: END 

S38 PRINT" Sa" > SPCCiS2" SOFT IOMS@" - PRINT 

S46 PRINTSPCCPS: "SHE ADO oOT" 

S56 PRINTSPCCP); "SM ERASE" 

S66 PRINTSPCCP): "S=@ UPDATE” 

S78 PRINTSPCCP); "SRS REVIEW" 

838 PRINTSPCCPS. "Som QUIT" 

$98 RETURH 


CIRCLE DEMO - VIC 26 


-POKES€ 
PORES Bee 
PORESS . a TPOKESE, 1S: POKES1:.8:POKESS pon ereace et 
FURIE ENT OS Sa HP PORE i+ 1iPEERGeta? : NEXT TO 
‘So Paso: P=? 4 RD oh 7ean 
Q=PEEK APOC TFS LS5 ‘THEN 
=E1Se+HeS +0 ANDP 3 PORKEC. PEER CCSORS Ste ?- CAND? o> RETURW 
CHOCN#1 S251 20+¢ 1274CN 08S: TES 1 SO 0S 
FORTS8TOF > POKES+I,PEERCT+I > i: aia etic ie: alicia cen 
FORT =i TOSS :POKEPSSa+22#1 . 33° NEXT 
PORE SSae+ii¥ee. 1a? 
FORT=iTO21°POKEPESEH+11#2S+1. 64: HEXT 
Fet Tiss och Ga - FORZ=8T Oe RAT STEP WS: H=COSCS5eRD+S8: Y=SINC SS RRDHL. P+58: GOSUBSE 
BECOS¢ 23 #RT4968 'Y=STIHe So eR TEL. 7495: GOSUBSE: HEXT 
GETAS: IFAS=""THENSO 
POKESE6S79. 27° FPRIHT TES". :- POKES6SéE9, 246 


bee 


PRIANT Se VIC CIRCLETDEMO see 
—— a poe Ieee. PEER CSAS SOR LSS 


= 
mj 
tie 





rep Li eo & 


<r, 
a! 


me ED ee Lp a 


— 
te! 


eet See es eee oe 


mo oo J 
ne 


HIRES PLOTTING 


iG PRINT" Smee VIC HIRES-PLOT #4" POKES6879. 42 POKES6869, 253: 
POKESSS67.PEEK(36_S67)0R12 

15 POKESS.@:POKESS, 19 POKES1,.0:POKES2, 19° CLR: S=a2768:T=5120 
20 FORI=GT0255%#8+7 : POKEI+T, PEEK¢1+S) ‘NEST : PRINT "2 

25 INPUT" SCOMMAND “J Ad: LFAS="E"THENPOKE 36879. 27: PRINT "SES"; : END 

30 IFAS="P"ORAS="U" THENINPUT "ste, "33,4! GOSUBAS 
25 IFAS="F"THEH?S 

44 GOTO 

45 RUSK/S ‘Wist’S | Panic vitk22+769G  O=PEEK (CP) : IFO<128THENEG 

SQ IFA$="U" THENC=5126+088+ (YAND? 3 : POKEC, PEEKS COAND( 255-2 t¢ 7-C HAND? 2D 
:RETURH 

SS CH=S120+0e8+ "AND? : POKEC PEEK C3OR(24¢7-<#AND? >> >: RETURH 

6, CN= =CH+1: S=5120+¢ 127+CN #8: T=51204+08S : FORI=87T07 : POKES+I.PEEKST+I> 
65 G=127+CH:POKEP. @:GOTOSS 

7G PRINT"<!" : FORISOTO22 : POKE76S0+22#1, 92: NEXT: POKE76S0+1 1422. 107 
‘DATALS.» 23.19 i 

75 FORI=17021 : POKE?TSSO+11#224+1,64:NEXT | 

S0 FORZ=1703: READE: FORM=4 70175: Y=. S#N+504+S INC CX-49-1 7 OeBe #15: GOSUBES 
‘NEXT NEXT: GOTO25 
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USING THE FUNCTION KEYS 


PEE DSS A SRE 
REM# 
REM* DEF IME 
REM# * 
REM* BY DAVE TOMG # 
REM# # 
REMR <C>) *f/7/S82 * 
REM# # 
pple tea 
DATA ise. 1eé i 
DATA 
DATA 
DATA 
DATA Fe: 
DATA 25 
DATA 33. 283 
DATA = 
DATA &:, 


* 
KEYS # 
* 


Z i as A i a am 
cee ee eR EE a a o 


Pye Ay hy ee 
ki 
a 
+ 
TT 


Pee oy et Oo 







Canoe O41. ™, a : 
Oe Oy ee tT 


bere ee Li Oo my oT feb 


Mo loi fe 


Zt: POKE F52e+K 
228):SYS (P5399 

REM SsyvS *o26 ACTIVATES THE KEY‘ 

REM Sto rdos ERASES THE FUNCT IONS 
FOR #=1 TO &:READ HF 

L= LENCNS>: IF Lo THEN PRIWTH: 
FOR 'v=1 TO agg ge tad wed i 
POKE P6@?+7+Ses.P°HEXT 4: HEX T 3 
PRINT SOFUNCT ION KEYS DEFINED. ": OLR: NEL 
REM PUT ‘NOUR OWA FUNCTIONS HERE - 
REM FOR CARRIAGE RETURN ENTER ree 
DATA "LIST#". "GOSUB". "RUN}". "PRINT" 
DATA "GOTO". "CHRE¢". "LOAD". "RETURNS" 


Jf Po Po fo Pa ae 
ho td fae 


~T Oo b2 o B 


WR Po Bo Po fy 


PNRM RA eS 


ee Mm A lg 


GI ho ho 


16 REM aeHHESHHSHOHE EEE EEE aE EE Hefei 
26 REM a+ EERE 
SH REM ss INFUT DATA ROUTINE CHEESE 
44 REM sade AWD EES 
28 REM se DATA FORMAT ROUTINE be 
6H REM see ay be 
Te REM #8 e+ re 3 bes 
SH REM #k# EE 
56 REM Eee ERER ERE EES CREE EERERS ERE ER EE ES ER ER EE EEE 
iga REM 

116 REM 

126 REM #3 EERE EEE EERE EEE 

136 REM ### TYPICAL, STRING IHFUT ### 

146 FEM SERED EEE EEE EES 


EVANS 


“T 
12270 THEN PRINT“DATA ERROR | RE-ENTER" : STOP 


Dade eaten: CHARACTERS MAXIMUM!" STOP 
°-IF F=35 THEM P=15 


MASIMUM & CHARACTERS! 
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-. 
mat 


Po eos Wooo oh 


CS CF Oe cre cal nde ace 
WE) a i eT 


1 
ct 
oe 


eA 
= 
—s 


eal 
Eat 


a ta ho oe Pe PZ 


ly i." 
4 
it 


ha ha eee 


mt a% 8 i'd 1%] 
oa! Wy Wh 


fat ta 
Wd 
A 
at Vt Lgl Lt Lal 


SONNE LE ce ace koe 
mt a Se ee ee et 


“JT LA fe bo eo mT 
1m 


7, 
te 


rm te Pe re 
S! WS HE We 


Mim ON enh hh ppp ppp bono oo 


TE Ao oh On es oe 


al 


Fed er en eRe ea er ee 


LH=28-:REM #*#*€ LEHGTH OF REGUIFED TITLE = 28 LETTERS 

PRINT"SUIOB TITLE — 7H"; 

GOSUBASa 

HAF=L# 

REM 

REM 

REM £#exEESEEEER ERAS REESE ERE EEE EEE EE 

REM ##*# TYPICAL NUMERIC INPUT Ee 3 

FELT SESE SEES EEA ERE 

LNH=": FEM ### IHFUT LEHGTH = F FIGURES 

PRINT "stelelelenENEER LEHGTH = * CMS IRR REERESSEI'. 

GOSUB4 28 

LH=YALCLE> 

IFL@=SAHDTILE<2 "8" ORLA: S997 HEHSSa 

REM 

REM 

FETS 638 SESE SE SRE EE Re ee ee 

REM #3 FORMAT HUMBER aE 

FELT] SESE SESE SESE SESE SE ERE SE RE 

PRINT " Sisisisteieie)" ; 

L=3:°D=6:H=L@:GOSUBSS@:FRIHT"G@ DECIMAL PLACES "NF 
=5:°D=1:N=L@:GOSUBSSa@:FRIHT"1 DECIMAL PLACE "He 

L=6:0=2:H=L@:GOSUBSSa:FRIHT"S DECIMAL FLACES "H+ 

L=8:D=4:H=L@:GOSUESS@:FRIHT'4 DECIMAL PLACES "HF 

REM 

FEM 

EMT 

REM eee eee E THPUT DATA ROUTINE 

A¢= uu : Et= iit < HAA=6 

GETA#: IFAR<=18THEH4 Fe 
=256#PEEKC1972+FPEEKRC1963+PEEK C1959 

FOKEI.FEEKCIS+¢ PEEK CI a 21eo3#12S-CPEEK CI o<1if2so#129: AAR=8 

IFA#=""THEMAAR=AA+1 : GOTOd4e 

IFASC CAPD =1S0RASC CASI == S2ANDASC ¢ AF 3 =CSSTHENS IA 

IFASCCAFS=SEANDLEN CLE os 

GOTO444 

IFA#<2CHRE* 13> THEMHPRIHMTAS: :LE=L$+A: IFLEHCL#2<LHTHEHd 4a 

IFLEH“{L#2=8THEH444 

PRINTS 8. 

RETURH | 





REM eee EEE SET DATA FORMAT FOR 


HF=STRECINTCH# 1a t+. So: TFOS8THENSSe 

IFH#=" 8" THEHN#="8. "+LEFT#¢ "GG886". To > GOTOSS8 
H#=LEFT#(N#. LEH{H$9—-Do+", "+R IGHTECHS, Do 
N#=RIGHTE¢" "+H$.L3 

RETURHM 


Y's 
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TL 


Turn your Commodore 
into a full time 
Profit Centre 
The New SCRIPTAL works all day long~ 


As a Data Terminal, producing perfect letters and reports from your 
favourite wordprocessor or impeccable invoices and statements from 
your trusty business system. 

During non-computing periods, SCRIPTA II reverts to the finest 
electronic typewriter. Depending upon your mood, you can choose any 
one of 20 Whisper-disk daisy typewheels which are available in 10, 12, 
15 and proportional pitch. Numerous fonts can be selected. Classic 
Gothic or Modern Pica for business, Fine Italic for those intimate little 
personal messages, Cubic for the chic replies, or Lecturer — the large 
character — for prompting you during speeches or sermons! 

An optional tractor or sheet feeder can be easily fitted or removed 
at any time to handle all types of documents, forms or letter heads. 

SCRIPTA II is a true dual purpose peripheral produced by Europe’s 
largest office equipment supplier — it is not a typewriter modified by 
some electronic wizard! The product is eligible for an annually renewable 
on-site Service Contract carried out by the Manufacturer, including all 
parts and labour. A rare thing these days! 

Just plug the SCRIPTA I into the mains and connect your data cable 
to its input port. Wordcraft, Word-Pro, Silicon Office, The Manager — in 
fact most software currently available for your Commodore machine, is 
readily configurable. 

Should you require further convincing that SCRIPTA IL is the ONLY 
terminal for your system, contact your Dealer, or write, ring or call Sole 
U. a Distributor — 


an °°*% Dataplus Ltd., 39/49 Roman Road, Cheltenham, GL51 8QQ, 
3 aha Tel: 0242-30030, Telex: 43594. 
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M/C Programming 


SUPERMON for the VIC 


Introduction 

No machine language monitor is provided in the 
VIC ROMs. Serious users find themselves in the 
same position as the first generation (BASIC 1.0) 
of PET users. Since only a commercial product, 
VICMON, is available, the need for a_ public- 
domain utility seemed a worthwhile project. 

Jim Butterfield has already developed 
TINYMON1, which may be found in the June 
issue of Commodore Computing. This offers the 
equivalent to the Commodore TIM monitor. 

We've already been accustomed to the benefits 
inherent in Supermon, Extramon and Micromon 
for the PET/CBM. Herewith my adaptation of 
Suprmon for the VIC. 

While we are on the subject of Jim Butterfield, | 
once again offer my thanks for his many contribu- 
tions to the PET/CBM/VIC community. His splen- 
did work and the donation of same to the public 
domain is quite remarkable. We often fail to 
acknowledge how rich is our store of knowledge 
because of this gentleman. 

Features 

Like its predecessors, VIC-20 SUPERMON 
loads and self-relocates to the top of VIC 
memory, regardless of the memory configuration 
installed. It was designed to fit in less than 2K, 
and | surrendered the “‘single-step’’ mode to ac- 
complish this goal. 

Make no mistake, there’s a lot of time to be in- 
vested to reproduce the code of this program. 

I've copied Jim’s technique of ‘’absolute-load’’ 
files with VIC-20 SUPERMON. This means that if 
you SAVE memory with the monitor, the VIC 
won't relocate it on you when you come to re- 
LOAD the code. 

‘Jim said that the PET would ignore such files, 
but my utility called VICLOAD covers that 
shortcoming. 


Procedure 

Apart from the investment of time, you don’t 
really need to be familiar with machine-launguage 
to enter the program. One of Supermon’s benefits 
is its value for beginners in ML programming. 

You'll need a PET/CBM with Upgrade (BASIC 
2.0) or BASIC 4.0 ROM installed. Start with a 
freshly powered-up machine. Enter the ML 
monitor by typing ‘SYS4’ and hitting ‘RETURN’. 

There are 20 screens of information to be 
entered before you’re done. Each requires the 
same procedure. Only the- first ( line entry) is 


54 
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slightly different: 
1. Immediately after the ‘’.’’, type the range of 
memory to be displayed, like so: 
-M 0028 0028 RETURN 


One line of hexadecimal digits is shown on the 
screen. 
2. Move the cursor back to this line and type over 
the digits with the values: 
.: 0028 01 04 DF OD DF OD DF OD RETURN 


Don’t forget to hit the ‘RETURN’ key at the end 
of each line, or else the new values won't be 
remembered. 

Now type in the starting and ending addresses 
for each of the 20 screens to be changed. For ex- 
ample, the first would be: 

.M 0400 0478 RETURN 


Copy the values shown in the accompanying 
‘‘hex dump’’ for each block shown. Type right 
over the existing values, (which will probably 
show as *‘AA”’ on your screen). Do your best to 
double-check before proceding with the next 
block. 

Repeat until the block from $OD80 to $ODF8 
is done. Now exit the monitor, with: 

.X RETURN 


NOW SAVE AND VERIFY THE PROGRAM. Do 
not pass ‘‘GO’’, do not collect $200 ... do this 
first! 


Checking 

Because of the 2000+ entries you’ve made, 
the chance for error is high. Several 
“‘“immediate-"’ or ‘‘Calculator- Mode’’ statements 
are provided to verify your work. 

These statements do a ‘‘check-sum’’ on the 
total program, each multiple of 5-screens (4 
check-sums), and each “‘line’’ of 8-entries. 

Enter the statements shown, with no line 
numbers please! On hitting ‘RETURN’, the total 
will be shown immediately below. 

If your first one shows ‘’283370’’, then it’s 
probably perfect. Go to the head of the class, and 
start using VIC-20 SUPERMON. 

Otherwise, work your way through the next 
four, noting which are correct. Each of these 
totals are a composite of 80 lines of entry, (or 
5-screens, as we put them in). 

For any incorrect block from above, there is a 


corresponding statement to type. This will give 
the individual totals for each line of entry. Mark 
the lines that are different. You will now have to 
re-enter the ML monitor and make the necessary 
corrections. ReSAVE this version and re-do the 
checksum until it’s correct. 


Operation 

Disconnect your cassette recorder (power off 
the PET first, please). Reconnect to the VIC, turn 
everything on, LOAD VIC-20 SUPERMON and 
RUN it. 

You should be greeted with the so-called 
“‘Register Display’’, as on the PET/CBM. Unless 
it’s a B & W display, you'll see several usages of 
VIC colour. 

Any entries you make will be in blue, while the 
VIC ..variously displays red for register headings 
or errors, purple for normal addresses, black for 
memory bytes and green for disassembly 
mnemonics or ‘‘next’’ addresses when assembl- 
ing code. 

Since we are dealing with a 22-character wide 
screen, the disassembly consumes two lines. The 


0580 85 1D A9 90 20 D2 FF AO 
0588 00 00 20 CB F8 OO Bi C1 
0590 20 34 FA 00 20 D3 F8 00 
0598 C6 1D DO F1 60 20 8B FA 
O5A0 00 90 OB A2 00 00 81 C1 
O5A8 C1 C1 FO 03 4C FC FA 00 
OSBO 20 D3 F8 00 C6 1D 60 AI 
O5B8 02 85 C1 AY 00 00 85 C2 
O5CO 60 98 48 20 CE F8 00 AY 
05C8 9C 20 D2 FF 68 A2 2E 4C 
O5DO 43 FA 00 A9 20 2C AY OD 
O5D8 4C D2 FF E6 Ci DO 06 E6 
O5E0 C2 DO 02 E6 26 60 AY 1C 
O5E8 20 D2 FF A2 00 00 BD EA 
OSFO FF 00 20 D2 FF E8 EO 16 
OS5F8 DO F5 AO 3B 20 BB F8 00 


0600 A5 00 00 20 34 FA 00 AS 
0608 01 20 34 FA 00 20 B2 F8 
0610 00 20 81 F8 00 FO 57 20 
0618 BB FA 00 20 7C FA 00 90 
0620 2E 20 6C FA OO 20 BB FA 
-s 0628 00 20 7C FA 00 90 23 20 
»: 0630 6C FA 00 20 70 F7 FO 3C 
-: 0638 A6 26 DO 38 AS C3 C5 Cl 
0640 AS C4 E5 C2 90 2E AO 3A 
0648 20 BB F8 00 20 2D FA 00 
-: 0650 20 81 F8 00 FO EO 4C FC 
~:?- 0658 FA ‘00 20 '7C FA /00:.90..03 
-: 0660 20 78 F8 00 20 B2 F8 00 
-: 0668 FO 05 20 7C FA 00 90 EB 
-: 0670 A9 05 85 1D 20 BB FA 00 
-: 0678 20 9C F8 00 DO F8 4C 44 


mnemonics are pushed to the right on the second 
line. More locations would have fit, but | chose to 
keep the actual ‘’bytes’’ display. This of course 
permits you to change them, and causes an 
automatic redisplay of the same range of 
addresses. 

The goal of ‘‘under 2K’’ was met (by 3 bytes), 
but the single-step had to be sacrificed. Someone 
else may re-work Micromon for VIC, but its 4K 
size is of no use to the ‘3583 BYTES FREE” 
crowd. 


In Closing 

‘If | use this half as much as Supermon for PET, 
it will have been worth the adaptation effort. 
Without Supermon 1.0 (for Original ROM), this 
would not have been feasible. A deep bow 
towards 14 Brooklyn Avenue, Toronto. 


David A. Hook 
58 Steel Street 
BARRIE, 

Ontario 

L4M 2E9 

(705) 726-8126 


0400 00 1A 04 64 00 99 22 93 
0408 12 1D 1D 1D 1D. 53.55 50 
0410 45 52 20 56 49 43 4D 4F 
0418 4E 00 2F 04 6E 00 99 22 
0420 11 44 41 56 49 44 20 41 
0428 2E 20 48 4F 4F 4B 00 44 
0430 04 70 00 99 22 11 46 52 
0438, GE GD. 20 53 55 50:45 52 
0440 4D 4F 4E 00 SE 04 73 00 
0448 99 22 11 42 59 20 4A 49 
0450 4D 20 42 55 54 54 45 52 
0458 46 49 45 4C 44 00 79 04 
0460 78 00 9E 28 C2 28 34 33 
0468" 29 AA*32'35-36 AC C2 28 
06470 34":34@ 29-AA 31° 32 37 29 
0478 00 O00 OO AA AA AA AA AA 


0480 A5 2D 85 22 AS 2E 85 23 
0488 A5 37 85 24 A5 38 85 25 
0490 AO 00 A5 22 DO 02 C6 23 
0498 C6 22 B1 22 DO 3C A5 22 
O4A0 DO 02 C6 23 C6 22 B1 22 
O4A8 FO 21 85 26 AS 22 DO 02 
O4B0 C6 23 C6 22 Bi 22 18 65 
O4B8 24 AA AS 26 65 25 48 A5 
04C0 37 DO 02 C6 38 C6 37 68 
04C8 91 37 8A 48 AS 37 DO 02 
O4D0 C6 38 C6 37 68 91 37 18 
04D8 90 B6 C9 BF DO ED AS 37 
O4EO 85 33 AS 38 85 34 6C 37 
O4E8 OO AA AA AA AA AA AA AA 
O4FO BF 78 AD E8 FF O00 8D 16 
O4F8 03 AD EY FF 00 8D 17 03 
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0500 
0508 
0510 
0518 
0520 
0528 
0530 
0538 
0540 
0548 
0550 
0558 
0560 
0568 
0570 
0578 


0700 
0708 
0710 
0718 
0720 
0728 
0730 
0738 
0740 
0748 
0750 
0758 
0760 
0768 
0770 
0778 


0780 
0788 
0790 
0798 
07A0 
07A8 
07BO0 
O7B8 
07C0O 
07C8 
07D0 
07D8 
07E0 
07E8 
O7FO 
O7F8 


A9 
D8 
85 
A8 
E9 
06 
2A 
1B 
00 
43 
25 
OE 
OA 
CA 
4C 
A5 


C9 
FF 
20 
F5 
10 
8F 
7C 
CF 
FA 
85 
FF 
4C 
FA 
GA 
OF 
D2 


FA 
20 
9A 
30 
A2 
CO 
20 
20 
60 
FA 
FA 
20 
85 
FA 
90 
CF 


80 
68 
03 
38 
00 
20 
20 
AQ 
85 
FA 
FO 
DD 
AA 
FF. 
FC 
C2 


00 
70 
A9 
C9 
02 
68 
8B 
8B 
AY 
00 
00 
B2 
2A 
00 
02 
FF 
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20 
85 
68 
8A 
00 
CE 
43 
1F 
26 
00 
F9 
BB 
BD 
00 
FA 
85 


FO 
OD 
F9 
4C 
EC 
00 
00 
C9 
A5 
20 
OD 
F8 
AS 
63 
63 
68 


2C 
ws 
00 
3A 
B5 
pe 
FA 
FA 
00 
C9 
C9 
FA 
20 
05 
69 
c9 


90 
05 
85 
E9 
85 
F8 
FA 
20 
A2 
20 
C9 
FE 
CB 
48 
00 
00 


E6 
60 
00 
FA 
4C 
C9 
20 
2C 
C1 
6C 
DO 
00 
C1 
FA 
FA 
4C 


FF 
68 
02 
02 
00 
00 
00 
D2 
OD 
BB 
20 
00 
FF 
60 
AS 
00 


85 
4C 
DO 
00 
44 
2C 
6C 
DO 
85 
FA 
CO 
AS 
48 
00 
00 
D2 


58 
85 
68 
85 
00 
A2 
AQ 
FF 
A9 
FA 
FO 
DO 
00 
CA 
C1 
60 


30 
AY 
99 
69 
B5 
DO 
02 
02 
2A 
09 
OE 
OA 
00 
60 
OF 
F8 


00 
04 
AA 
01 
BA 
42 
52 
A9 
2E 
00 
FS 
OC 
48 
10 
85 
A9 


20 
FA 
20 
90 
00 
EZ 
00 
20 
A5 
20 
82 
20 
4A 
68 
8A 
20 


F8 
03 
60 
06 
C2 
F3 
85 
85 
20 
20 
18 
OA 
20 
C9 
60 
68 


0680 
0688 
0690 
0698 
06A0 
06A8 
O6BO 
O6B8 
06CO 
06C8 
06DO 
06D8 
O6E0 
O6E8 
O6FO 
O6F8 


0880 
0888 
0890 
0898 
O8A0 
O8A8 
08BO 
O8B8 
08C0O 
08C8 
08DO 
08D8 
O8EO 
O8E8 
O8FO 
O8F8 


0900 
0908 
0910 
0918 
0920 
0928 
0930 
0938 
0940 
0948 
0950 
0958 


- 0960 


0968 
0970 
0978 


F8 
Oc 
00 
06 
O1 
04 
6C 
B9 
AQ 
20 
OD 
CF 
FO 
10 
C9 
20 


00 
C9 
90 
9A 
48 
A4 
02 
88 
40 
CF 
FO 
FF 
28 
FO 
OD 
8B 


85 
60 
00 
00 
00 
26 
oF 
00 
2A 
85 
1A 
C1 
34 
00 
00 
00 


00 
1D 
00 
D3 
00 
00 
00 
00 
C9 
9D 
OD 
1C 
00 
CF 
FA 
86 


LE 
20 
20 
20 
20 
DO 
Al 
20 
FB 
C3 
FB 
81 
20 
4C 
20 
20 


20 
A6 
90 
F8 
4C 
20 
20 
A2 
27 
10 
FO 
8E 
90 
ry 
00 
1C 


8B 
26 
OC 
00 
44 
6C 
6C 
00 
DO 
02 
22 
00 
C6 
c9 
90 
20 


c9 
20 
F8 
00 
A5 
A6 
84 
90 
02 
FO 
DO 
OF 
B7 
20 
2C 
OF 


C2 
00 
00 
00 
00 
2A 
C3 
00 
A5 
C4 
26 
2A 
00 
00 
00 
00 


00 
13 
1D 
EE 
00 
00 
00 
20 
20 
20 
20 
01 
10 
FO 
EO 
F8 


OD 
7C 
00 
48 
03 
06 
BA 
84 
85 
E9 
34 
c9 
C8 
CF 
DO 
FO 


A8 
20 
20 
20 
90 
FB 
20 
DO 
1E 
85 
DO 
FB 
20 
20 
20 
20 





FO 
FA 
A6 
AS 
A6 
9A 
84 
93 
BC 
C9 
20 
OD 
CO 
FF 
DD 
EA 


COMMODORE 
SYSTEMS 
DISTRIBUTORS 


SERVICE 


TO INDUSTRY 


%e ALL BUSINESS SYSTEMS INCLUDE 12 
MONTHS WARRANTY 


e¢ COMPLETE RANGE OF CBM 
EQUIPMENT IN STOCK, INCLUDING 
8096, VIC 8023 PRINTERS, ETC. 


%e LEASING AVAILABLE 


% NATIONAL MAINTENANCE 
CONTRACTS AVAILABLE 


¥ SPECIALIST SOFTWARE INCLUDES 
WORK STUDY 
PLANNED MAINTENANCE 
BONUS CALCULATION 
PRODUCTION CONTROL 


% STANDARD SOFTWARE IN STOCK 
INCLUDING: 
STOCK CONTROL 
WORD PROCESSING 
D.M.S. 
INTEGRATED AND INDIVIDUAL 
LEDGERS 
SILICON OFFICE 


%¥ INSTITUTIONAL AND GOVERNMENT 
DEPT. PURCHASERS: SEND FOR OUR 
PRICE LIST 


4 CASH PURCHASERS 
PRODUCE THIS ADVERT. AND WE 
WILL PAY YOUR V.A.T. 


DEMONSTRATIONS BY ARRANGEMENT 


HEALEY MANAGEMENT 


Also At: 
Phoenix House 
1 New Street 
Worcester 


(0905) 611545 


Head Office: 
442/6 London Fruit Exchange 
Spitalfields 
London E1 


(01) 247 2858 


QWERTY COMPUTER SERVICES 


2@ WORCESTER AGAD, NEWTON WALL, DUAKAM 
Tel. (0385) 67045 


ROM ‘N’ RAM 


is a4K ROM/EPROM/RAM emulator, use the write 
signal to convert the CMOS RAM into ROM. No 
need to have MULTI-ROM switchboards just save 
the contents of the programme/security ROM on- 
to disk/cassette for each ROM which occupies the 
socket, from then on use ROM ‘N’ RAM e.g. 


1. Switch into RAM mode 

2. Load ROM contents from disk/cassette 
3. Switch into ROM mode 
4. Run programme 


Of course there is no limit to the number of times 
ROM ‘N’ RAM can be used. 


Inc. VAT 
£40.25 
£37.95 
£34.50 


Quantity Excl VAT 
£35 
2-4 £33 
5 plus £30 


EXTRA 
Battery backup £6 £6.90 
SAE for catalogue. Barclaycard & Access orders 
accepted (Also after 6.00pm and Weekends) 


HI-KESOLUTION GRAPHICS 
A high resolution graphics board that gives a 64,000 dot (320 x 200) resolu- 
tion. Versions available for any dynamic ram Pet, BASIC 2,3,4, FAT40 & 80 
columns. No soldering or track cutting required, supplied complete with fast 
GRAPHIX software in ROM and full fitting & operating instructions. £149.00 


SUPER ROM-SELECTOR 


A high quality printed circuit board giving 64K of utility ROM space, software 
selectable!!! Allows 16x 4K ROMs/EPROMs to reside in the expansion area of 
your PET. One ‘POKE’ enables any two ROMs at a time. Suitable for bank- 
switched software. £75.00 


PET UPGRADES 


WHILE-U-WAIT service! (Dynamic ram pets only). 
Memory expansion: 


40-80 column switchable (two machines in one!).........cccccccceeeeeeeees £105.00 
Full keyboard functions: i.e. TAB, ESC, REPEAT, SCROLL up/down, define 
WINDOW, lowercase/graphics mode and DELETE from/to cursor. All 
available in direct or program mode. 


REPAIRS AND SERVICING 
Fast and efficient repairs to all Commodore computers at reasonable prices. 
WHILE-U-WAIT service whenever possible. 
Please add VAT to the prices shown at the current rate. 
Telephone Mick Bignell for more details at: 


MICROSERVE 

7 Clydesdale Close, 
Borehamwood, Herts. WD6 2SD. 
Tel: 01-953 8385 
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0800 
0808 
0810 
0818 
0820 
0828 
0830 
0838 
0840 
0848 
0850 
0858 
0860 
0868 
0870 
0878 


OAOO 
OA08 
OA10 
OA18 
OA20 
OA28 
OA30 
0A38 
OA4O 
OA48 
OA50 
0A58 
OA60 
OA68 
OA70 
OA78 


OA80 
OA88 
OA90 
0A98 
OAAO 
OAA8 
OABO 
OAB8 
OACO 
OAC8 
OADO 
OAD8 
OAEO 
OAE8 
OAFO 
OAF8 


4C 
00 
DO 
60 
F9 
01 
00 
20 
BO 
D2 
44 
DO 
C4 
27 
F3 
FB 


44 
00 
02 


BO 
DO 
BD 
85 
03 
4A 
88 
FC 
C4 
27 
00 
29 
26 
20 
F8 
FA 
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00 
Cl 
26 
FA 
00 
FA 
FA 
00 
06 
ar 
20 
E6 
02 
68 
28 
C3 


4A 
AO 
FF 
98 
8A 
09 
F2 
A2 
C8 
F2 
28 
00 
2A 
FF 
20 
20 


A2 
DO 
D6 
00 
00 
00 
00 
20 
9A 
20 
CB 
C3 
B5 
aD 
A4 
AG 


4A 
80 
00 
29 
FO 
20 
60 
O01 
90 
60 
B9 
00 
88 
CA 
E3 
F4 


02 
08 
C2 
C9 


2C 
B4 
D6 
20 
00 
92 
09 
FA 
1C 
FF 
00 
02 
48 
CA 
4C 
38 


FD 
20 
DO 
C9 
FC 
OE 
00 
A6 
D4 
98 
20 
iF 
65 
90 
5 
DD 


4A 
00 
2A 
AA 
4A 
DO 
C1 
OC 
A2 
B9 
FF 
05 
F8 
EC 
00 
00 


A2 
C2 
C1 
FO 
00 
FA 


ote | 
00 
29 
98 
90 
FA 
20 
FB 
03 
3B 
00 
06 
69 
4C 
20 
20 


0980 
0988 
0990 
0998 
O9A0 
09A8 
09BO 
O9B8 
09CO 
09C8 
09DO 
09D8 
O9EO 
O9E8 
O9FO 
O9F8 


OB80 
OB88 
OB90 
OB98 
OBAO 
OBA8 
OBBO 
OBB8 
OBCO 
OBC8 
OBDO 
OBD8 
OBEO 
OBE8 
OBFO 
OBF8 


0CcOO 
0C08 
0C10 
0C18 
0C20 
0C28 
0C30 
0C38 
0C40 
0C48 
0c50 
0C58 
0C60 
0C68 
0Cc70 
0C78 


00 
10 
DO 
F8 
DO 
4C 
85 
A2 
93 
20 
85 
A9 
44 
00 
00 
Al 


C9 
20 
FA 
A9 
02 
00 
75 
20 
AA 
00 
06 
15 
21 
C5 
06 
BD 


00 
02 
F3 
00 
92 
44 
20 
00 
20 
67 
Cl 
91 
F8 
20 
20 
C1 


OD 
D4 
00 
30 
E8 
86 
A2 
EO 
BC 
20 
EO 
AS 
20 
FE 
2A 
2E 


B5 
FE 
DO 
20 
A5 
FB 
1E 
DO 
8A 
00 
ot 
84 
20 
ry 
00 
FD 


AO 
DO 
20 
20 
20 
F8 
A5 
00 
D2 
FC 
84 
AA 
00 
CB 
CB 
20 


FO 
FE 
A4 
9D 
DO 
26 
00 
FC 
3B 
BD 
03 
2A 
C3 
00 
90 
FF 


CA 
00 
A6 
6C 
29 
00 
10 
FA 
A4 
91 
C1 
C2 
CB 
20 
A9 
00 


00 
Oc 
2D 
D3 
31 
00 
C2 
85 
FF 
00 
C2 
20 
AO 
F8 
F8 
EO 


DO 
DO 
AS 
FA 
c9 
90 
OA 
A6 
1F 
C1 
20 
AO 
F8 
2D 
iF 
A8 


00 
C8 
FA 
F8 
FB 
20 
85 
27 
A9 
20 
C6 
43 
2C 
00 
00 
FC 


C9 
BO 
84 
02 
86 
04 
86 
A6 
00 
00 
19 
E8 
00 
C7 
BC 
20 


D1 
AB 
28 
00 
9D 
OA 
4C 
1E 
DO 
88 
D1 
41 
00 
FA 
20 
20 


FO 
20 
85 
9D 
A2 
26 
A5 
86 
7B 
E3 
1F 
30 
CC 
DO 
FF 
FE 


OA 
BC 
1D 
iF 
1D 
DO 
FA 
F6 
B9 
F8 
00 
BB 
1E 
20 
FF 
FE 





DD 
1C 
CB 
26 
DD 
00 
08 
A9 
1D 
00 
F2 
4C 
F8 
FA 
00 
A9 


F5 
oF 
C1 
10 
00 
FO 
26 
29 
FF 
A2 
FO 
BO 
20 
EB 
00 
00 


AI 09 A2 00 00 0C80 
28 20 CE F8 00 0C88 
00 20 D1 FC 00 0c90 
C2 20 70 F7 FO 0C98 
FB 00 BO E9 4C OCAO 
20 E3 FA 00 AQ OCA8 
20 BB FA 00 20 OCBO 
DO F8 A5 20 85 OCB8 
S502 AC Ayre OCCO 
FO 03 20 D2 FF OCC8 
FA 00 20 6C FA OCDO 
02 A2 03 20 DB OCD8 
CA DO F9 A2 03 OCEO 
3F AO 05 4A 6E OCE8 
10 02 88 DO F6 OCFO 
A2 02 20 CF FF OCF8 
8A 1C 23 5D 8B OD80 
8A 1D 23 9D 8B OD88 
00 29 19 AE 69 0D90 
24 53 1B 23 24 OD98 
00 00 1A 5B 5B ODAO 
24 AE AE A8 AD ODA8 
7C 00 00 15 9C ODBO 
69 29 53 84 13 ODB8 
69 23 AO D8 62 ODCO 
62 94 88 54 44 ODC8 
44 E8 94 00 00 ODDO 
74 B4 28 6E 74 ODD8 
72 F2 A4 8A 00 ODEO 
A2 148th Ja Fe ODE8 
32 B2 00 00 22 ODFO 
1A 26 26 72 72 ODF8 


T=0: FORJ=1024T03550: T=T+PEEK(J): 
283370 


READY. 
T=0: FORJ=1024T01663: T=T+PEEK(J): 
68631 


READY. 
T=0: FORJ=1664T02303: T=T+PEEK(J): 
os i a 


READY. 
T=0: FORJ=2304T02943: T=T+PEEK(J): 
74768 


READY. 
T=0 : FORJ=2944T03550: T=T+PEEK(J): 
62816 


READY. 


NEXT: 


NEXT: 


NEXT: 


NEXT: 


"7 


?T 


: i § 


ita i 


bas 


Commodore Computing 


59 





M/C Programming 


FORJ=1024T01663STEP8 : T=0:FORK=JTOJ+7 FORJ=2304T02943STEP8 : T=0: FORK=JTOJ+7 


:T=T +PEEK(K):NEXT:?T, :NEXT >T=T +PEEK(K) : NEXT: ?T, :NEXT 

464 382 565 426 835 672 923 1265 
474 451 472 587 901 916 859 881 

447 538 +79 481 937 901 1293 589 

655 774 510 850 999 989 1179 1046 
756 780 802 910 75t 926 1013 943 

886 853 801 784 1083 901 867 677 

876 840 835 1383 986 880 1329 909 

153 1190 1134 831 987 810 645 1103 
816 803 753 883 964 892 874 1089 
686 889 850 893 1059 981 941 1001 
593 987 1415 1035 1219 795 837 792 

1088 1079 1070 762 975 838 808 1052 
11352 853 825 1193 aL? 684 863 825 

639 1207 983 824 994 791 1284 911 

975 1041 744 1408 977 1179 991 514 

965 1082 1230 1139 858 1282 992 916 

664 793 768 987 698 832 888 1283 
905 617 1049 1218 822 994 666 1190 
1192 794 1201 803 tii? 977 995 a7] 

858 1030 805 1036 1146 805 737 1305 


FORJ=1664T02303STEP8:T=0:FORK=JTOJ+7 FORJ=2944T03551STEP8:T=0:FORK=JTOJ+7 


:T=T +PEEK(K) :NEXT: ?T, :NEXT :T=T +PEEK(K) : NEXT: ?T, :NEXT 

1196 1068 713 682 1202 880 1259 797 

646 683 913 1191 997 924 645 891 

1045 1417 835 1166 1239 1072 901 1054 
1417 1224 1150 951 958 1437 698 965 

1232 1143 991 953 1290 1295 1013 985 

884 1103 796 1284 876 818 800 1318 
LITS 937 1 aa fe 835 L425 1095 1002 1 ap aa | 
902 770 638 g Paar 714 1027 1021 1079 
876 912 714 660 959 671 726 655 

1133 1388 894 893 443 475 475 502 

659 919 825 500 5 $2 739 458 540 

854 708 443 1340 600 457 662 325 

762 963 1293 1038 461 843 535 445 

655 930 658 875 477 1031 342 810 

953 1270 1001 1419 848 734 836 882 

1082 1082 878 1256 1180 956 612 356 

1104 Pat fe 834 858 980 797 Sor 923 

806 837 968 1185 848 1368 908 902 

645 1301 782 1003 1089 288 481 564 

943 963 916 859 
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The new Seikosha GP-I me VC 





graphics printer for around £235: 


Offering big printer perfor- 


mance at a fraction of the cost, the plus Seikosha’s proven reliability 


Many other advanced features, FEATURES INCLUDE: 
© 80 col. 30 cps. 


latest addition to the famous range —_ and the nationwide support of Pe iniihanmer ation 
of Seikosha micro-printers is the DRGs distributor network make © ~O0lMaliixunthammer action. _ 
100VC. The precise match for the the 1OOVC the natural choicefor  @ 154 characters (inc graphics) 





























VIC 20. the VC 10 user. @ VIC208-BITCODE _ 
Featuring allthe VIC 20 DIMENSIONS: Full cramtics. 

characters, symbols and graphics oy a oS  _____— 

as standard, the Seikosha 100VC Depth — 9¥%4" (234mm) @ Double width printing. 

includes full graphics capability. Width - 1744" (420mm) e@ Automatic printing 


It enables graphic, character and Height — 5%” (136mm) 
double width character modes to ; 





@ Up to 10” paper width. vant 








be intermixed on a single line as OPTIONS: @ Original + 2 copies. _ 


well as repeating graphics data, 





as _. Interfacing for most other systems _ @ Tractor feed. 


you want, with a single command. available on the GP1OOA model. ime PRR CSE TER ic hg oy des 





DRG 


BUSINESS 


MACHINES 
—_—_ 





@Selftestng 


Telephone the number below and we'll tell you where your nearest distributor 
is located. See the remarkable Seikosha GPLOOVC in action 


(Peripherals & Supplies Division) 13/14 Lynx Crescent, Winterstoke Road, 
Weston-super-Mare, BS24 ODN. Tel: (0934) 416392. 
THE FINEST WORLDWIDE SUPPORTED NATIONWIDE. 


DRG (UK) Ltd, Reg No. 22419 England. 
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INLAB 


The Interface 
System 


to suit your Micro 








































APPLE II/ITT 2020 
CBM PET/VIC-20 
HP-85 (IEEE-488) 
SUPERBRAIN 
SHARP MZ-80K/80B 
TRS-80 

S-100 Computers 

or RS232C/V24 

or 20mA current loop 








INLAB is a multi-channel 
modular Eurocard system 
housed in a 19” industrial 
rack with integral power 
supply, connectors, ribbon 
cable etc. 


Units available include:- 

@ 16-,8-, 4- channel 
analog multiplexers 

@ 12-bit A/D convertor 
(25, psec) 

@ 13-bit integrating A/D 

convertor 


® 12-bit 4 channel D/A 
convertor 


®@ 6 BCD digits opto-isolated 
inputs with full hand-shake 


@ 8-channel relay (or opto- 
isolator) control unit 


@ Bidirectional RS232C/V24 + 
current loop with handshake 


@ Programmable stepper 
motor controller + 
power supply 


@ Real Time Clock/Calendar 


@ 8 Decade Universal 
Frequency/Period Counter. 
Fully programmable. 
(DC-10MHz) 

@ 8-channel programmable 
gain amplifier. 

Fully differential. 











FULL HARDWARE & 
SOFTWARE SUPPORT 






Write/Telephone for a 
demonstration with your 
own computer. 


Y Digital 
Design and 
% Development 


18/19 Warren Street 
London W1P 5DB Tel: 01 387 7388 
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‘SIMPLY WRITE’: the kind of word processor you 
didn't think you could afford. Some £300 programs have 
fewer facilities. Tape or disk; any printer; any 40 or 80 
column PET. Needs 16K. Tape £40; disk £45. 

‘SIMPLY FILE’ Records System (DBMS). Selects by 
any key. Prints alphabetical lists, mailing labels, colum- 
nar reports of all or selected records. Calculates bet- 
ween fields. Totals, averages columns. Works with ‘Sim- 


ply Write’. Fast, easy, robust and very, very versatile. 
Disk £65. 


GOTTA PET? ADDA VIC! High resolution graphics, 

programmable characters, colour and sound for your 

PET/CBM system? All this PLUS a complete extra com- 

puter using your PET’s disk drives, printer etc? Under 

£200 including VIC computer and our ‘SIMPLY LINK’ 
PET-VIC link system. 


A WINDOW ON YOUR DISK! Our ‘Simply 
Recover’ disk file repair kit (4040 only at present) 
will allow you to save crashed files, append BASIC 
or m/c subroutines, change disk names and IDs, 
devise protection systems, etc. Disk & detailed 
instructions £17 
ZYGIAN INVADERS. Super second 
generation machine code invaders game. 


Tape £6, disk £7.50 
ASTEROID PATROL. Classic game with 
sound effects, 9 levels of play, hyper- 
space jump etc. Tape £6, disk £7.50 
ADD VAT TO PRICES PLEASE, BUT ALL 
INCLUDE P&P. SEND FOR MORE 
DETAILS, MORE ITEMS, AND GET OUR 
FREE ‘MICROMAIL’ PET/VIC NEWS- 
LETTER. 
Simple Software Ltd. 
15 Havelock Rd., Brighton. 
Sussex BN1 6GL 


Tel: (0273) 504879 
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IF YOU HAVE ONE OF THESE... 


AND YOU WOULD LIKE... 





THE PERFECTION OF THE ABILITY TO AUTOMATE YOUR 
A TAILORED SOLUTION BUSINESS ROUTINES THE WAY 
YOU WANT 


WITHOUT THE FEAR OF 
MAKING THE WRONG DECISION 


WITHOUT THE WITHOUT BEING A 


IN WHAT CAN ONLY BE DESCRIBED 
HIGH COST COMPUTER EXPERT 


AS A CONFUSING MARKET 





SILICON OFFICE DOES IT ALL 


Add muscle to your 8032 with a memory expansion board and SILICON OFFICE and give yourself some elbow room. SILICON 
OFFICE is a leading software product for the Commodore 8096, that offers you the ability to create and control your application 
system(s) the way you want it. 





The unique ‘data base’ facility in SILICON OFFICE has easy to use routines to draw record cards on the screen, insert and ‘housekeep’ 
your file information and then combine and analyse data from several files to produce complex reports designed to your needs. 
Simple but repetitive routines can be stored for subsequent execution. A powerful word processor is built in, available at all times, 
with the emphasis on ease of use for the average typist. 


In fact SILICON OFFICE can be considered as a product offering three packages in one with communications complementing the 
data base and word processor. If you already own a Commodore 8032 this can be quickly upgraded to the latest technology micro- 
computer — add SILICON OFFICE and you will have a total and cost effective solution to your software needs for years to come 
and all of this for just over £1000. For more details contact your Commodore dealer or complete the coupon below. 


sissies lil wc solesek sed) aca” ed sian Likeness hei: es el pene ——— — — aes 


PLEASE SEND ME MORE DETAILS ON SILICON OFFICE 
Name 


Position 





Company. 


Address Telephone: 


Send to: Bristol Software Factory, Kingsons House, Grove Avenue, Queen Square, Bristol BS1 40Y. Telephone 0272 277135 


eee 2 ee 








@ 64K of RAM....20K of internal ROM 


© Superb colour graphics and sound STACK also have available for the CBM 

@ Unbelievable SPRITE graphics 64...LIGHTPEN, RS232 INTERFACES, 

® 40 columns ANALOGUE JOYSTICK for SPRITE motion, 
®@ 16 colours MEMORY EXPANSION.... 


® Programable attack, decay, sustain, pitch, 
wave form, volume....practically a music 
synthesizer! 


‘ ORDER YOUR COMMODORE 64 NOW FROM 
STACK TO ENSURE EARLY DELIVERY 


® CP/M capability as a plug-in option 
Wie £299 
plus VAT 


(shipping £6 plus VAT) 


























VIC:20 LIGHT PEN + ie 
PENGAMES 


Light Pen Go (colour and sound) 

The program allows two players to play this 

traditional and fascinating Oriental game 

wg and removing pieces using the LIGHT 
+, 


MULTI-BUS 
(IEEE) 


for Pet Multi-Users Light Pen Othello (colour and sound) 


A two-player yn placing and reversin: 
Peart in this high strategy game using the 
C—O. IGHT PEN +. 
Light Pen Draughts (colour and sound) 
The program allows two players to play 
Hold the LIGHT PEN + like anormal pen, point jainst each other using the pen to move and 
it at your TV screen and the pen tells your take, including kings and blocking of illegal 
bhp a hogy it sees! Instead = pressing keys, Moves. Requires a 3K RAM pack. 
touch the screen with your LIGHT PEN + and | ight Pen Concentration (colour an me 
move your man in CHESS, create LIFE, play ppt game in ih apack kor igi 
OTHELLO, play GO. Point the pen atyourman are shown face down on the screen and turned 
and move him to his new position. Many over by the LIGHT PEN + ina search for pairs. 
james are already available for the LIGHT Highest score wins 
EN + and many more are being developed. ‘ 
Youcan write pregame which allow youtoread Light Pen Life (colour and sound) 
with your LIGHT PEN + fromthe TV screenor _ |n this cult game pieces are placed in the 





® Asingle ROM for each Pet” in the system uses the Pets’ own 
intelligences to organise the sharing of any CBM disc drive. 

@ No external hardware required. 

@ Uses standard Pet cabling. 

® Works with most standard software including Superscript, 
Comal, Pascal, etc.. 

® Compatible with TURBO ROM. 

® Many different files of the same or different types may be 
processed simultaneously or even shared. 

@ A screen message indicates if delays are encountered and 
original screen contents are restored entirely when bus is 


free ere images or words on the screen. e.g. universe and grow or die like bacteria colonies 
. j ae : rom a long list on your screen use the LIGHT _ in life giving fascinating gliding or pulsing 
* for 4000, 8000 series, any Basic 4 machine including upgrades. PEN + toc the facts and figures you displays 


want. The well-known game 
CONCENTRATION is supplied on cassette Cassette based games for use with 
tape FREE with every LIGHT PEN + STACKS’ Commodore Approved LIGHT 


A Neat System at a Neat Price! only £25.00 ousvar ae 8; ed 


FREE GAME SUPPLIED!! 










Starter Set (2 Pets) £8 1 00. VAT AN ).\ Reve}! 3 Programming the VIC-20? Why not write your 
Extra Pets (ordered with above) £27.00. var ed eh eee ee hen 
Later Additions £36.00. JOYSTICK Tied pipet wesjeary open ig 


spaceship in a figure of eight or loop the loop 
— you are not restricted to up, down, right, left 
any longer! 


Special ROM required for 9” Pets £19.00. var soty 19.00 sacvar 
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Stack Computer Services Limited, 290-298 Derby Road, Bootle, Merseyside. 051-933 5511. Telex: 627026. 





